(* Content-type: application/mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 6.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       145,          7]
NotebookDataLength[    554178,      11363]
NotebookOptionsPosition[    543044,      11023]
NotebookOutlinePosition[    543436,      11040]
CellTagsIndexPosition[    543393,      11037]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[{
 RowBox[{"<<", "ACPackages`"}], "\[IndentingNewLine]", 
 RowBox[{"<<", "ACPackages`Master`"}]}], "Input",
 InitializationCell->True,
 CellChangeTimes->{{3.418311793374*^9, 3.418311795829*^9}, {3.45431131631*^9, 
  3.45431132055*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"SetWorkDir", "[", "\"\<2010.08.15\>\"", "]"}]], "Input",
 CellChangeTimes->{{3.395821793675*^9, 3.3958217970369997`*^9}, {
   3.3958260630439997`*^9, 3.395826064809*^9}, 3.395842380564*^9, {
   3.39589985106*^9, 3.395899853052*^9}, 3.3960364854486*^9, 
   3.396040695883*^9, 3.3960407682826*^9, {3.408519766388*^9, 
   3.408519767705*^9}, {3.40863746709*^9, 3.408637470236*^9}, 
   3.408639047334*^9, {3.409564032356*^9, 3.409564052227*^9}, {
   3.4095954093970003`*^9, 3.409595410924*^9}, {3.409595754549*^9, 
   3.409595756567*^9}, {3.409596262354*^9, 3.409596265032*^9}, 
   3.41104138592*^9, 3.41123371196*^9, 3.41123811176*^9, {
   3.4112790142139997`*^9, 3.411279014398*^9}, {3.411279100526*^9, 
   3.41127910094*^9}, {3.416156537936*^9, 3.416156545707*^9}, 
   3.41615680249*^9, 3.4162956737878685`*^9, {3.416545783627*^9, 
   3.416545783731*^9}, 3.41655266969*^9, 3.4165541284189997`*^9, {
   3.416574300321*^9, 3.416574300848*^9}, 3.4165801437530003`*^9, {
   3.416594050041*^9, 3.4165940534820004`*^9}, {3.418311781093*^9, 
   3.41831178867*^9}, {3.4183143891219997`*^9, 3.418314389639*^9}, {
   3.418314791756*^9, 3.418314792234*^9}, {3.418314839737*^9, 
   3.418314840156*^9}, {3.418316632895*^9, 3.418316639075*^9}, 
   3.418317266976*^9, {3.453570475815*^9, 3.453570484571*^9}, {
   3.4536111032438*^9, 3.453611105303*^9}, {3.4552481227854*^9, 
   3.4552481228213997`*^9}, {3.4552481533004*^9, 3.4552481533934*^9}, {
   3.4552482112384*^9, 3.4552482113283997`*^9}, {3.45914658221875*^9, 
   3.459146590890625*^9}, {3.459147855796875*^9, 3.459147855828125*^9}, {
   3.4591481458125*^9, 3.459148146*^9}, 3.459148575234375*^9, {
   3.459161621015625*^9, 3.459161627765625*^9}, {3.45916235809375*^9, 
   3.45916235815625*^9}, {3.45916427234375*^9, 3.459164274359375*^9}, {
   3.461495375796875*^9, 3.461495383171875*^9}, {3.461495414140625*^9, 
   3.461495427046875*^9}, {3.48558200459375*^9, 3.485582010296875*^9}, {
   3.485592577171875*^9, 3.4855925781875*^9}, {3.485593625828125*^9, 
   3.485593626546875*^9}, {3.4855937498125*^9, 3.48559375359375*^9}, {
   3.485593837234375*^9, 3.48559383940625*^9}, {3.486965403622375*^9, 
   3.486965406013*^9}, 3.486979901388*^9, 3.487314241372375*^9, {
   3.487317342841125*^9, 3.487317347184875*^9}, {3.487483272536625*^9, 
   3.4874832784585*^9}, {3.487484860317875*^9, 3.487484861099125*^9}, 
   3.487575947849125*^9, {3.4876666652404814`*^9, 3.487666666020481*^9}, {
   3.4880124487387686`*^9, 3.488012448832369*^9}, {3.488607239366625*^9, 
   3.488607241554125*^9}, {3.489736579866*^9, 3.489736581073*^9}, {
   3.490672383328125*^9, 3.4906723891875*^9}, {3.49067491928125*^9, 
   3.490674921609375*^9}, {3.490677885140625*^9, 3.490677889234375*^9}, 
   3.490680869484375*^9, {3.4906834044375*^9, 3.49068340703125*^9}, 
   3.4906835085*^9, {3.49068446265625*^9, 3.49068446603125*^9}, {
   3.49068554171875*^9, 3.49068554221875*^9}, {3.49068685365625*^9, 
   3.49068685384375*^9}, {3.49068691528125*^9, 3.4906869161875*^9}, {
   3.49068704465625*^9, 3.4906870450625*^9}, 3.490689986390625*^9, 
   3.490690599296875*^9, 3.490690768796875*^9, {3.4906930125625*^9, 
   3.49069301690625*^9}, 3.490695890140625*^9, {3.4910466188894997`*^9, 
   3.4910466231551247`*^9}}],

Cell[BoxData["\<\"D:\\\\Programs\\\\icmm\\\\tormagn\\\\2010.08.15\"\>"], \
"Output",
 CellChangeTimes->{
  3.489736589184*^9, 3.490672389421875*^9, 3.490674921828125*^9, 
   3.490677889484375*^9, 3.49068086978125*^9, 3.49068340715625*^9, 
   3.490683508625*^9, 3.490684468125*^9, 3.4906855424375*^9, 
   3.49068685409375*^9, 3.49068691646875*^9, 3.4906870455625*^9, 
   3.490689986921875*^9, 3.490690599703125*^9, 3.49069076890625*^9, 
   3.490692322109375*^9, {3.490693013*^9, 3.490693017265625*^9}, 
   3.49069589275*^9, 3.4910466468582497`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"SetWorkDir", "[", "]"}]], "Input",
 CellChangeTimes->{{3.435519141579*^9, 3.435519144023*^9}}],

Cell[BoxData["\<\"d:\\\\home\\\\Anton\\\\programs\\\\tormagn\"\>"], "Output",
 CellChangeTimes->{3.435519144508*^9, 3.435556738723*^9, 3.487313371778625*^9}
  ]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"SetWorkDir", "[", "\"\<Run\>\"", "]"}]], "Input",
 CellChangeTimes->{{3.415348973909*^9, 3.415348978164*^9}, {3.415511414216*^9,
    3.415511415973*^9}, {3.415532850358*^9, 3.4155328532209997`*^9}, {
   3.41553290101*^9, 3.415532911358*^9}, {3.415638973808*^9, 
   3.415638983182*^9}, 3.415640266615*^9, 3.415640832935*^9, 
   3.415641524351*^9, {3.4156968208307877`*^9, 3.415696831923897*^9}, {
   3.416156529984*^9, 3.416156533074*^9}, {3.486447731028*^9, 
   3.486447746653*^9}, {3.4864497572155*^9, 3.486449757528*^9}, {
   3.4868822863255*^9, 3.48688228641925*^9}, {3.48688418266925*^9, 
   3.48688418273175*^9}, {3.486887357809875*^9, 3.486887357888*^9}, {
   3.486887779278625*^9, 3.486887779372375*^9}, {3.486965409263*^9, 
   3.486965414747375*^9}, 3.486966424309875*^9, 3.48697066929425*^9, {
   3.48697166798175*^9, 3.486971673309875*^9}, {3.4879169967542267`*^9, 
   3.4879169968946266`*^9}, {3.6020587436461525`*^9, 3.602058743951157*^9}}],

Cell[BoxData["\<\"D:\\\\Programs\\\\icmm\\\\tormagn\\\\Run\"\>"], "Output",
 CellChangeTimes->{3.6020587442961626`*^9, 3.602067653597556*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"$HistoryLength", "=", "0"}], ";"}]], "Input"],

Cell[CellGroupData[{

Cell["\:0420\:0430\:0437\:0431\:043e\:0440 \:043b\:043e\:0433\:043e\:0432", \
"Subsubsection",
 CellChangeTimes->{{3.459149071734375*^9, 3.459149077390625*^9}, {
  3.4881780695880804`*^9, 3.488178080929283*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"text", "=", 
   RowBox[{"Import", "[", 
    RowBox[{"\"\<../message.dat\>\"", ",", "\"\<Text\>\""}], "]"}]}], 
  ";"}]], "Input",
 CellChangeTimes->{{3.48559318984375*^9, 3.485593201171875*^9}, {
   3.48559363425*^9, 3.485593636*^9}, {3.48559375640625*^9, 
   3.485593764359375*^9}, {3.485593806890625*^9, 3.48559380803125*^9}, 
   3.487483693161625*^9, 3.487484866036625*^9, {3.4911055378686247`*^9, 
   3.4911055381342497`*^9}}],

Cell[BoxData[{
 RowBox[{
  RowBox[{"StrMsg", "[", "msg_String", "]"}], ":=", 
  RowBox[{
  "\"\<(?s)(message of proc#(\\\\d+) at \
)?t=(-?\\\\d+(\\\\.\\\\d+)?)\\\\s*Niter=(\\\\d+)\\\\s*time of \
work=\\\\d+(\\\\.\\\\d+)? sec:\\\\s*\>\"", "<>", 
   "msg"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"StrChg", "[", "par_String", "]"}], ":=", 
  RowBox[{"StrMsg", "[", 
   RowBox[{"par", "<>", "\"\< was changed to\>\""}], "]"}]}]}], "Input",
 CellChangeTimes->{{3.4881288522647004`*^9, 3.488128923775114*^9}, {
  3.4881289939439287`*^9, 3.4881289991699295`*^9}, {3.4881290957183485`*^9, 
  3.488129108619551*^9}, {3.488129143672758*^9, 3.4881291502247596`*^9}, {
  3.4881291873995667`*^9, 3.488129209863571*^9}, {3.488129338501197*^9, 
  3.4881293410439973`*^9}, {3.4881780336144733`*^9, 3.4881780339108734`*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"StrChg", "[", "par_String", "]"}], ":=", 
   RowBox[{
   "\"\<t=(-?\\\\d+(\\\\.\\\\d+)?)\\\\s*Niter=(\\\\d+)\\\\s*time of \
work=\\\\d+(\\\\.\\\\d+)? sec:\\\\s*\>\"", "<>", "par", "<>", 
    "\"\< was changed to\>\""}]}], ";"}]], "Input",
 CellChangeTimes->{{3.4880044264059744`*^9, 3.4880044541427803`*^9}, {
  3.4880044964499884`*^9, 3.4880044989303885`*^9}, {3.4881288406426983`*^9, 
  3.4881288436534986`*^9}, {3.4881293289539948`*^9, 3.488129334320396*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"Rmt", "=", 
   RowBox[{"StringCases", "[", 
    RowBox[{"text", ",", 
     RowBox[{
      RowBox[{"RegularExpression", "[", 
       RowBox[{"StrChg", "[", "\"\<Rm\>\"", "]"}], "]"}], "\[RuleDelayed]", 
      RowBox[{"ToExpression", "[", "\"\<$3\>\"", "]"}]}]}], "]"}]}], 
  ";"}]], "Input",
 CellChangeTimes->{{3.4870558406852226`*^9, 3.487055853836025*^9}, {
   3.487575967021*^9, 3.487576027505375*^9}, {3.488004444361578*^9, 
   3.4880044620987816`*^9}, 3.488132368942199*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"StringCases", "[", 
   RowBox[{"text", ",", 
    RowBox[{
     RowBox[{"RegularExpression", "[", 
      RowBox[{"StrMsg", "[", "\"\<(.*?)\>\"", "]"}], "]"}], "\[RuleDelayed]", 
     "\"\<$0\>\""}]}], "]"}], "//", "Length"}]], "Input",
 CellChangeTimes->{{3.488129036110737*^9, 3.4881290536295404`*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"StringCases", "[", 
  RowBox[{"text", ",", 
   RowBox[{
    RowBox[{"RegularExpression", "[", 
     RowBox[{"StrChg", "[", "\"\<rc\>\"", "]"}], "]"}], "\[RuleDelayed]", 
    "\"\<$3\>\""}]}], "]"}]], "Input",
 CellChangeTimes->{
  3.4880047216516333`*^9, {3.4881292217507734`*^9, 3.488129227975175*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"\<\"0.6500\"\>", ",", "\<\"0.5500\"\>", ",", "\<\"0.4500\"\>", 
   ",", "\<\"0.3500\"\>"}], "}"}]], "Output",
 CellChangeTimes->{
  3.488004722369233*^9, 3.488129028373135*^9, {3.4881291660275626`*^9, 
   3.4881291746387644`*^9}, {3.4881292154327726`*^9, 3.488129228833175*^9}, 
   3.490672394859375*^9, 3.490674925140625*^9, 3.490677892625*^9, 
   3.490680873265625*^9, 3.490683410171875*^9, 3.49068351171875*^9, 
   3.490684472484375*^9, 3.490685547984375*^9, 3.490686858953125*^9, 
   3.490689991609375*^9, 3.4906908701875*^9, 3.490695899171875*^9, 
   3.4910466478894997`*^9, 3.4911055418529997`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"cs", "=", 
   RowBox[{"StringCases", "[", 
    RowBox[{"text", ",", 
     RowBox[{
      RowBox[{"RegularExpression", "[", 
       RowBox[{"StringJoin", "[", 
        RowBox[{"\"\<(?s)(\>\"", ",", 
         RowBox[{"StrChg", "[", "\"\<rc\>\"", "]"}], ",", 
         "\"\<)?(.+?)(?=(\>\"", ",", 
         RowBox[{"StrChg", "[", "\"\<rc\>\"", "]"}], ",", "\"\<)|$)\>\""}], 
        "]"}], "]"}], "\[RuleDelayed]", "\"\<$0\>\""}]}], "]"}]}], ";", 
  RowBox[{"cs", "=", 
   RowBox[{
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"StringCases", "[", 
        RowBox[{"#", ",", 
         RowBox[{
          RowBox[{"RegularExpression", "[", 
           RowBox[{"StrChg", "[", "\"\<rc\>\"", "]"}], "]"}], "\[Rule]", 
          "\"\<$3\>\""}]}], "]"}], ",", 
       RowBox[{"StringCases", "[", 
        RowBox[{"#", ",", 
         RowBox[{
          RowBox[{"RegularExpression", "[", 
           RowBox[{"StrChg", "[", "\"\<Rm\>\"", "]"}], "]"}], "\[Rule]", 
          "\"\<$3\>\""}]}], "]"}], ",", 
       RowBox[{"StringCases", "[", 
        RowBox[{"#", ",", 
         RowBox[{
          RowBox[{"RegularExpression", "[", 
           RowBox[{"StrMsg", "[", "\"\<snap is done\>\"", "]"}], "]"}], 
          "\[Rule]", "\"\<$5\>\""}]}], "]"}]}], "}"}], "&"}], "/@", "cs"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"TableForm", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"{", 
     RowBox[{
      RowBox[{"#", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], 
      ",", 
      RowBox[{"#", "\[LeftDoubleBracket]", 
       RowBox[{"3", ",", 
        RowBox[{"-", "1"}]}], "\[RightDoubleBracket]"}]}], "}"}], "&"}], "/@",
    "cs"}], "]"}]}], "Input",
 CellChangeTimes->{{3.4881283132689934`*^9, 3.488128408070212*^9}, {
  3.4881286317742567`*^9, 3.4881286321798563`*^9}, {3.4881287291962757`*^9, 
  3.488128763687883*^9}, {3.4881293882028065`*^9, 3.4881294557040205`*^9}, {
  3.488129725693274*^9, 3.488129735958076*^9}, {3.4881298041144896`*^9, 
  3.488129810338891*^9}, {3.488132660225457*^9, 3.488132660724657*^9}}],

Cell[BoxData[
 InterpretationBox[GridBox[{
    {
     InterpretationBox["\<\"\"\>",
      {}], "\<\"13954\"\>"},
    {GridBox[{
       {"\<\"0.6500\"\>"}
      },
      GridBoxAlignment->{
       "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
        "RowsIndexed" -> {}},
      GridBoxSpacings->{"Columns" -> {
          Offset[0.27999999999999997`], {
           Offset[0.7]}, 
          Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
          Offset[0.2], {
           Offset[0.1]}, 
          Offset[0.2]}, "RowsIndexed" -> {}}], "\<\"13023\"\>"},
    {GridBox[{
       {"\<\"0.5500\"\>"}
      },
      GridBoxAlignment->{
       "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
        "RowsIndexed" -> {}},
      GridBoxSpacings->{"Columns" -> {
          Offset[0.27999999999999997`], {
           Offset[0.7]}, 
          Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
          Offset[0.2], {
           Offset[0.1]}, 
          Offset[0.2]}, "RowsIndexed" -> {}}], "\<\"11946\"\>"},
    {GridBox[{
       {"\<\"0.4500\"\>"}
      },
      GridBoxAlignment->{
       "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
        "RowsIndexed" -> {}},
      GridBoxSpacings->{"Columns" -> {
          Offset[0.27999999999999997`], {
           Offset[0.7]}, 
          Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
          Offset[0.2], {
           Offset[0.1]}, 
          Offset[0.2]}, "RowsIndexed" -> {}}], "\<\"10693\"\>"},
    {GridBox[{
       {"\<\"0.3500\"\>"}
      },
      GridBoxAlignment->{
       "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
        "RowsIndexed" -> {}},
      GridBoxSpacings->{"Columns" -> {
          Offset[0.27999999999999997`], {
           Offset[0.7]}, 
          Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
          Offset[0.2], {
           Offset[0.1]}, 
          Offset[0.2]}, "RowsIndexed" -> {}}], "\<\"9142\"\>"}
   },
   GridBoxAlignment->{
    "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
     "RowsIndexed" -> {}},
   GridBoxSpacings->{"Columns" -> {
       Offset[0.27999999999999997`], {
        Offset[2.0999999999999996`]}, 
       Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
       Offset[0.2], {
        Offset[0.4]}, 
       Offset[0.2]}, "RowsIndexed" -> {}}],
  TableForm[{{{}, "13954"}, {{"0.6500"}, "13023"}, {{"0.5500"}, "11946"}, {{
     "0.4500"}, "10693"}, {{"0.3500"}, "9142"}}]]], "Output",
 CellChangeTimes->{
  3.4881297799500847`*^9, {3.4881298145820913`*^9, 3.4881298242696934`*^9}, 
   3.4881323517977953`*^9, 3.488132649243055*^9, 3.488132892337903*^9, 
   3.4881329252071095`*^9, 3.488133008230326*^9, 3.489736590462*^9, 
   3.490672397*^9, 3.4906749266875*^9, 3.4906778939375*^9, 
   3.49068087446875*^9, 3.490683411265625*^9, 3.49068351346875*^9, 
   3.490684475640625*^9, 3.49068555003125*^9, 3.490687130140625*^9, 
   3.4906882739375*^9, 3.490689994140625*^9, 3.490690157828125*^9, 
   3.490690603609375*^9, 3.490690871390625*^9, 3.4906923243125*^9, 
   3.490693030046875*^9, 3.49069590525*^9, 3.4910466497957497`*^9, 
   3.4910683156863747`*^9, 3.4911055444467497`*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{"cs", "[", 
  RowBox[{"[", "12", "]"}], "]"}]], "Input",
 CellChangeTimes->{{3.490697866359375*^9, 3.490697867515625*^9}, {
   3.490698013390625*^9, 3.490698013453125*^9}, 3.490698310015625*^9, 
   3.4906987253125*^9}],

Cell[BoxData[
 RowBox[{"StringCases", "[", 
  RowBox[{"text", ",", 
   RowBox[{
    RowBox[{
    "RegularExpression", "[", 
     "\"\<t=(20(\\\\.\\\\d+)?)\\\\s*Niter=(\\\\d+)\\\\s*time of work=(\\\\d+(\
\\\\.\\\\d+)?) sec:\\nsnap is done\>\"", "]"}], "\[RuleDelayed]", 
    RowBox[{"{", 
     RowBox[{"\"\<$1\>\"", ",", "\"\<$3\>\"", ",", "\"\<$4\>\""}], "}"}]}]}], 
  "]"}]], "Input",
 CellChangeTimes->{{3.48757604280225*^9, 3.48757606767725*^9}, 
   3.487576171849125*^9, 3.4906908838125*^9}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"StringReplace", "[", 
  RowBox[{
   RowBox[{"StringDrop", "[", 
    RowBox[{
     RowBox[{"\"\<=\>\"", "<>", 
      RowBox[{"StringJoin", "[", 
       RowBox[{
        RowBox[{
         RowBox[{"#", "<>", "\"\<+\>\""}], "&"}], "/@", 
        RowBox[{
         SuperscriptBox["%187", "\[Transpose]"], "[", 
         RowBox[{"[", "3", "]"}], "]"}]}], "]"}]}], ",", 
     RowBox[{"-", "1"}]}], "]"}], ",", 
   RowBox[{"\"\<.\>\"", "\[Rule]", "\"\<,\>\""}]}], "]"}]], "Input",
 CellChangeTimes->{{3.487576122567875*^9, 3.48757617730225*^9}, {
  3.487576266567875*^9, 3.487576361036625*^9}, {3.489736620275*^9, 
  3.4897366445769997`*^9}, {3.490680804203125*^9, 3.490680804640625*^9}, {
  3.4906832724375*^9, 3.490683293625*^9}, {3.490684102796875*^9, 
  3.490684114390625*^9}, {3.490690876546875*^9, 3.490690876984375*^9}, {
  3.4906960439375*^9, 3.49069604425*^9}, {3.490696085484375*^9, 
  3.490696085625*^9}}],

Cell[BoxData["\<\"=688,917+732,954+723,446+739,469+745,263+728,915+757,292+\
739,571+888,042+16124,1+5995,71+1662,78+2411,28+1966,04+1843,18+972,732+951,\
614+1057,18+1348,6\"\>"], "Output",
 CellChangeTimes->{
  3.490680804890625*^9, {3.49068327284375*^9, 3.490683293796875*^9}, {
   3.49068407134375*^9, 3.490684114609375*^9}, 3.490690877140625*^9, 
   3.4906960448125*^9, 3.49069608596875*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"ListPlot", "[", 
  RowBox[{"Rmt", ",", 
   RowBox[{"PlotRange", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{"1", ",", "40"}], "}"}]}], ",", 
   RowBox[{"PlotLabel", "\[Rule]", 
    RowBox[{"Last", "[", "Rmt", "]"}]}], ",", 
   RowBox[{"Joined", "\[Rule]", "True"}]}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"Last", "[", "Rmt", "]"}]}], "Input",
 CellChangeTimes->{{3.485593206828125*^9, 3.48559321809375*^9}, {
   3.48559326203125*^9, 3.4855933948125*^9}, {3.485593490796875*^9, 
   3.485593498703125*^9}, {3.485593540453125*^9, 3.485593572984375*^9}, {
   3.48559381503125*^9, 3.485593815125*^9}, {3.486447879278*^9, 
   3.48644787980925*^9}, {3.486965646466125*^9, 3.486965655372375*^9}, {
   3.486965685684875*^9, 3.48696568685675*^9}, {3.4870552997395153`*^9, 
   3.487055302110716*^9}, {3.4870558570496264`*^9, 3.487055857533226*^9}, {
   3.4873124696750193`*^9, 3.487312498987425*^9}, {3.4873132760079794`*^9, 
   3.4873132962567835`*^9}, {3.487313364272797*^9, 3.4873133726187987`*^9}, {
   3.487315072925537*^9, 3.487315072987937*^9}, 3.4873161050061417`*^9, 
   3.488019966996463*^9, {3.4880931286242013`*^9, 3.4880931317442017`*^9}, {
   3.488159060157503*^9, 3.4881590673179045`*^9}, {3.490674936265625*^9, 
   3.490674936515625*^9}, {3.4906779559375*^9, 3.490677956109375*^9}, {
   3.490684480359375*^9, 3.490684480421875*^9}, {3.490686864828125*^9, 
   3.490686865109375*^9}, 3.49069100271875*^9, {3.49069591184375*^9, 
   3.4906959119375*^9}, 3.490697999125*^9, 3.4911055553217497`*^9}],

Cell[BoxData[
 GraphicsBox[
  {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJxTTMoPSmViYGBQBmIQDQEf7LndVEuZtEwcoAIOHg+rRNapw/gcDruyOX8u
EIfxBRyaAz3nNnwzhvJFHIC6Z3G8hvElHDKUciqqrsL4Mg5A1WqHrsH4Cg5v
59noXDkF4ys5PDaTOhCdADNfxeHmue/Bj6fC+GoOOqmSjyLKYXwNh/WqT5rn
xcL4Wg6KG4oyJvrC+DoOQNdIz6uD8fUcLvsmCUTcNIXyDRxebl/P/PwPjG/o
cCBawfFjszmUb+SQ/C7Kya4Cxge6c2LdbysFCyjfxMElM/9Dq6UllG/q8O71
AUvlXTC+mYNGXc/ObE6YenOI/CszKN/CQW/Cgh+GZjC+pcPklU2BnrwwvpUD
M2eXfPI6mPusHaK+7rzV1Qvj2ziYLNpi/iMJxrd1eLCPb46xE8y/dg6VEStM
z2bDwtfeARh76Zu7YPIODmUP5ggufQvlNzg4pFjf9+99DlPv6FAozftA1wDK
b3B06Lx07wH3ZiMHANXqh+0=
    "]]},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesOrigin->{0, Automatic},
  ImageSize->{718., Automatic},
  PlotLabel->FormBox["18.6994`", TraditionalForm],
  PlotRange->{1, 40},
  PlotRangeClipping->True]], "Output",
 CellChangeTimes->{{3.4870552934059143`*^9, 3.487055302547516*^9}, 
   3.4870558585160265`*^9, 3.4873119348757133`*^9, {3.487312467194619*^9, 
   3.4873124995802255`*^9}, 3.4873132436379733`*^9, {3.4873132766163797`*^9, 
   3.487313296646784*^9}, {3.487313364491197*^9, 3.4873133728683987`*^9}, {
   3.4873150667479353`*^9, 3.4873150733935366`*^9}, {3.4873161014181414`*^9, 
   3.487316105286942*^9}, 3.487403337983534*^9, 3.487467088780821*^9, 
   3.487467265887656*^9, 3.487467430124489*^9, 3.4874824464300737`*^9, 
   3.487483663349125*^9, 3.4874837133335*^9, 3.487484868942875*^9, {
   3.4880199628312616`*^9, 3.488019967292863*^9}, {3.4880204338577557`*^9, 
   3.4880204386313562`*^9}, 3.488034432177337*^9, {3.488088362589254*^9, 
   3.4880883668948545`*^9}, 3.4880885208980856`*^9, 3.488088650034911*^9, 
   3.488089126693006*^9, 3.488089935818367*^9, {3.4880931222906*^9, 
   3.4880931321654015`*^9}, 3.488094850209343*^9, 3.488096608953693*^9, 
   3.488127356474003*^9, 3.4881277414976797`*^9, {3.488128125897356*^9, 
   3.48812814847056*^9}, 3.4881295148436317`*^9, 3.4881332617147765`*^9, 
   3.4881590169454947`*^9, {3.4881590549315023`*^9, 3.4881590678483047`*^9}, 
   3.488172383558551*^9, 3.4906724339375*^9, {3.490674933234375*^9, 
   3.49067493684375*^9}, 3.490677907484375*^9, 3.49067795628125*^9, 
   3.490680878625*^9, {3.490683551734375*^9, 3.490683556484375*^9}, {
   3.49068447828125*^9, 3.490684480578125*^9}, 3.490685562015625*^9, {
   3.49068686071875*^9, 3.490686865359375*^9}, 3.4906899988125*^9, 
   3.490690606984375*^9, 3.490690957109375*^9, 3.4906910029375*^9, 
   3.490693030109375*^9, {3.49069590540625*^9, 3.490695912125*^9}, 
   3.4906979994375*^9, 3.4910466729988747`*^9, 3.4910683178738747`*^9, {
   3.4911055472279997`*^9, 3.4911055558061247`*^9}}],

Cell[BoxData["18.6994`"], "Output",
 CellChangeTimes->{{3.4870552934059143`*^9, 3.487055302547516*^9}, 
   3.4870558585160265`*^9, 3.4873119348757133`*^9, {3.487312467194619*^9, 
   3.4873124995802255`*^9}, 3.4873132436379733`*^9, {3.4873132766163797`*^9, 
   3.487313296646784*^9}, {3.487313364491197*^9, 3.4873133728683987`*^9}, {
   3.4873150667479353`*^9, 3.4873150733935366`*^9}, {3.4873161014181414`*^9, 
   3.487316105286942*^9}, 3.487403337983534*^9, 3.487467088780821*^9, 
   3.487467265887656*^9, 3.487467430124489*^9, 3.4874824464300737`*^9, 
   3.487483663349125*^9, 3.4874837133335*^9, 3.487484868942875*^9, {
   3.4880199628312616`*^9, 3.488019967292863*^9}, {3.4880204338577557`*^9, 
   3.4880204386313562`*^9}, 3.488034432177337*^9, {3.488088362589254*^9, 
   3.4880883668948545`*^9}, 3.4880885208980856`*^9, 3.488088650034911*^9, 
   3.488089126693006*^9, 3.488089935818367*^9, {3.4880931222906*^9, 
   3.4880931321654015`*^9}, 3.488094850209343*^9, 3.488096608953693*^9, 
   3.488127356474003*^9, 3.4881277414976797`*^9, {3.488128125897356*^9, 
   3.48812814847056*^9}, 3.4881295148436317`*^9, 3.4881332617147765`*^9, 
   3.4881590169454947`*^9, {3.4881590549315023`*^9, 3.4881590678483047`*^9}, 
   3.488172383558551*^9, 3.4906724339375*^9, {3.490674933234375*^9, 
   3.49067493684375*^9}, 3.490677907484375*^9, 3.49067795628125*^9, 
   3.490680878625*^9, {3.490683551734375*^9, 3.490683556484375*^9}, {
   3.49068447828125*^9, 3.490684480578125*^9}, 3.490685562015625*^9, {
   3.49068686071875*^9, 3.490686865359375*^9}, 3.4906899988125*^9, 
   3.490690606984375*^9, 3.490690957109375*^9, 3.4906910029375*^9, 
   3.490693030109375*^9, {3.49069590540625*^9, 3.490695912125*^9}, 
   3.4906979994375*^9, 3.4910466729988747`*^9, 3.4910683178738747`*^9, {
   3.4911055472279997`*^9, 3.4911055558217497`*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Select", "[", 
  RowBox[{
   SuperscriptBox[
    RowBox[{"{", 
     RowBox[{"Rmt", ",", 
      RowBox[{"RotateLeft", "[", "Rmt", "]"}]}], "}"}], "\[Transpose]"], ",", 
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{"First", "[", "#", "]"}], "/", 
      RowBox[{"Last", "[", "#", "]"}]}], "<", 
     RowBox[{"1", "/", "2"}]}], "&"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.4870558610432267`*^9, 3.487055951226845*^9}, {
  3.487487163699411*^9, 3.487487168020612*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"General", "::", "\<\"stop\"\>"}], ":", 
  " ", "\<\"\\!\\(\\*StyleBox[\\\"\\\\\\\"Further output of \\\\\\\"\\\", \
\\\"MT\\\"]\\)\[NoBreak]\\!\\(\\*StyleBox[\\!\\(\[Infinity] :: \
\\\"indet\\\"\\), \\\"MT\\\"]\\)\[NoBreak]\\!\\(\\*StyleBox[\\\"\\\\\\\" will \
be suppressed during this calculation.\\\\\\\"\\\", \\\"MT\\\"]\\) \
\\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \
ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/stop\\\", \
ButtonNote -> \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG",
 CellChangeTimes->{3.49069651659375*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"53.6975`", ",", "411.5796`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"53.7787`", ",", "424.7031`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"54.0186`", ",", "163.1205`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"54.4055`", ",", "204.6042`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"54.9204`", ",", "314.2294`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"55.5277`", ",", "411.4447`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"56.1905`", ",", "561.8971`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"56.8542`", ",", "302.604`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.`", ",", "155.5906`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"59.3789`", ",", "145.6903`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"3.4467`", ",", "7.874`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.1227`", ",", "0.7669`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"41.6201`", ",", "134.8527`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"34.459`", ",", "344.5904`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"28.9494`", ",", "187.443`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"28.997`", ",", "64.8537`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"2.8446`", ",", "180.6779`"}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{3.487483664942875*^9, 3.487483716755375*^9, 
  3.48748487117725*^9, 3.48808914822101*^9, 3.4881295283532343`*^9, 
  3.4906724493125*^9, 3.49067496446875*^9, 3.490680881609375*^9, 
  3.4906835599375*^9, 3.49069651659375*^9}]
}, Open  ]]
}, Closed]],

Cell[CellGroupData[{

Cell["\:0413\:0440\:0430\:0444\:0438\:043a\:0438 \:043f\:043e \:0432\:0440\
\:0435\:043c\:0435\:043d\:0438", "Subsubsection",
 CellChangeTimes->{{3.459149071734375*^9, 3.459149077390625*^9}}],

Cell[BoxData[{
 RowBox[{
  RowBox[{"Off", "[", 
   RowBox[{"Thread", "::", "tdlen"}], "]"}], ";"}], "\n", 
 RowBox[{
  RowBox[{"lv", "=", 
   RowBox[{"ReadList", "[", "\"\<vv.dat\>\"", "]"}]}], ";", 
  RowBox[{"lv", "=", 
   RowBox[{"Map", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{"#", "\[LeftDoubleBracket]", 
         RowBox[{"1", ",", "1"}], "\[RightDoubleBracket]"}], ",", 
        RowBox[{"#", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}]}],
        "}"}], "&"}], ",", "lv"}], "]"}]}], ";"}], "\n", 
 RowBox[{
  RowBox[{"ltm", "=", 
   RowBox[{"Flatten", "[", 
    RowBox[{"First", "/@", "lv"}], "]"}]}], ";"}], "\n", 
 RowBox[{"{", 
  RowBox[{
   RowBox[{"Length", "[", "ltm", "]"}], ",", 
   RowBox[{"Last", "[", "ltm", "]"}]}], "}"}]}], "Input",
 CellChangeTimes->{{3.3960002006979976`*^9, 3.3960002014509974`*^9}}],

Cell[BoxData[
 RowBox[{"PrintRange", "[", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"First", "[", "#", "]"}], ",", 
       RowBox[{"Max", "[", 
        RowBox[{"Last", "[", "#", "]"}], "]"}]}], "}"}], "&"}], "/@", "lv"}], 
   ",", "All", ",", 
   RowBox[{"PlotLabel", "->", "\"\<Maximum of stream velocity\>\""}]}], 
  "]"}]], "Input",
 CellChangeTimes->{3.395821803665*^9}],

Cell[BoxData[
 RowBox[{"Export", "[", 
  RowBox[{"\"\<energy5.dat\>\"", ",", 
   RowBox[{"Transpose", "@", 
    RowBox[{"Join", "[", 
     RowBox[{
      RowBox[{"{", "ltm", "}"}], ",", 
      RowBox[{"Map", "[", 
       RowBox[{"Last", ",", 
        RowBox[{"{", 
         RowBox[{
         "mp", ",", "mdp", ",", "mvx", ",", "mdvx", ",", "mvy", ",", "mdvy", 
          ",", "mvz", ",", "mdvz", ",", "mAx", ",", "mdAx", ",", "mAy", ",", 
          "mdAy", ",", "mAz", ",", "mdAz", ",", "mBx", ",", "mBy", ",", "mBz",
           ",", "mqp", ",", "mqvx", ",", "mqvy", ",", "mqvz", ",", "mqAx", 
          ",", "mqAy", ",", "mqAz", ",", "mqBx", ",", "mqBy", ",", "mqBz"}], 
         "}"}], ",", 
        RowBox[{"{", "2", "}"}]}], "]"}]}], "]"}]}]}], "]"}]], "Input",
 CellChangeTimes->{{3.4119212950629997`*^9, 3.4119213045950003`*^9}, {
  3.411921341668*^9, 3.411921369223*^9}}],

Cell[BoxData[{
 RowBox[{"PrintRange", "[", 
  RowBox[{
   RowBox[{"dif", "[", "ltm", "]"}], ",", "All", ",", 
   RowBox[{"PlotLabel", "->", "\"\<Time step\>\""}]}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{"PrintRange", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"{", 
     RowBox[{
      RowBox[{
       RowBox[{"#", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], 
       "/", "3"}], ",", 
      RowBox[{"#", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}]}], 
     "}"}], "&"}], "/@", 
   RowBox[{"(", 
    RowBox[{"mqvx", "+", "mqvy", "+", "mqvz"}], ")"}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.4156990880644884`*^9, 3.4156990886645484`*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Dynamic", "[", 
  RowBox[{"Refresh", "[", "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{
     RowBox[{"len", "=", 
      RowBox[{"Transpose", "[", 
       RowBox[{"Select", "[", 
        RowBox[{
         RowBox[{"Import", "[", 
          RowBox[{"\"\<energy.dat\>\"", ",", "\"\<Table\>\""}], "]"}], ",", 
         RowBox[{
          RowBox[{"(", 
           RowBox[{"0", "<", 
            RowBox[{"First", "[", "#", "]"}]}], ")"}], "&"}]}], "]"}], 
       "]"}]}], ";", "\[IndentingNewLine]", 
     RowBox[{"ltm", "=", 
      RowBox[{"First", "[", "len", "]"}]}], ";", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{
       "mp", ",", "mdp", ",", "mvx", ",", "mdvx", ",", "mvy", ",", "mdvy", 
        ",", "mvz", ",", "mdvz", ",", "mAx", ",", "mdAx", ",", "mAy", ",", 
        "mdAy", ",", "mAz", ",", "mdAz", ",", "mBx", ",", "mBy", ",", "mBz", 
        ",", "mqp", ",", "mqvx", ",", "mqvy", ",", "mqvz", ",", "mqAx", ",", 
        "mqAy", ",", "mqAz", ",", "mqBx", ",", "mqBy", ",", "mqBz"}], "}"}], 
      "=", 
      RowBox[{
       RowBox[{
        RowBox[{"Transpose", "[", 
         RowBox[{"{", 
          RowBox[{"ltm", ",", "#"}], "}"}], "]"}], "&"}], "/@", 
       RowBox[{"Drop", "[", 
        RowBox[{"len", ",", "2"}], "]"}]}]}], ";", "\[IndentingNewLine]", 
     RowBox[{"PrintRange", "[", 
      RowBox[{
       RowBox[{
        RowBox[{
         RowBox[{"{", 
          RowBox[{
           RowBox[{
            RowBox[{
            "#", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], "/", 
            "3"}], ",", 
           RowBox[{"Log", "[", 
            RowBox[{"10", ",", 
             RowBox[{
             "#", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}]}], 
            "]"}]}], "}"}], "&"}], "/@", 
        RowBox[{"(", 
         RowBox[{"mqBx", "+", "mqBy", "+", "mqBz"}], ")"}]}], ",", "All", ",",
        "\[IndentingNewLine]", 
       RowBox[{"PlotLabel", "\[Rule]", 
        RowBox[{"\"\<Last energy=\>\"", "<>", 
         RowBox[{"ToString", "[", 
          RowBox[{"Last", "[", 
           RowBox[{"Last", "[", 
            RowBox[{"mqBx", "+", "mqBy", "+", "mqBz"}], "]"}], "]"}], 
          "]"}]}]}]}], "]"}]}], ",", 
    RowBox[{"UpdateInterval", "\[Rule]", "5"}]}], "]"}], 
  "\[IndentingNewLine]", "]"}]], "Input",
 CellChangeTimes->{{3.395821810158*^9, 3.3958218234230003`*^9}, 
   3.395842386082*^9, {3.3959942473796*^9, 3.3959942775256*^9}, 
   3.3959990851589975`*^9, 3.408519827112*^9, {3.4085199685030003`*^9, 
   3.4085199721809998`*^9}, {3.408523680314*^9, 3.408523683005*^9}, {
   3.408523760568*^9, 3.408523763465*^9}, {3.408524195633*^9, 
   3.4085242044110003`*^9}, {3.409567684186*^9, 3.4095676869820004`*^9}, {
   3.411278618098*^9, 3.41127861859*^9}, {3.411278661243*^9, 
   3.411278661674*^9}, {3.4113750589110003`*^9, 3.41137505923*^9}, {
   3.411721744043*^9, 3.411721744212*^9}, 3.411814654814*^9, 3.4123412374*^9, 
   3.412341651447*^9, 3.4123574371549997`*^9, 3.4123581250039997`*^9, 
   3.412358262223*^9, 3.4123583164969997`*^9, {3.415640840615*^9, 
   3.4156408500810003`*^9}, {3.4162814919309998`*^9, 3.416281506709*^9}, 
   3.41655419221*^9, 3.416564140802*^9, {3.4165748570030003`*^9, 
   3.4165748869890003`*^9}, 3.416575273749*^9, 3.416575310836*^9, 
   3.416580366032*^9, 3.416580397729*^9, 3.416580578803*^9, {
   3.416633754105*^9, 3.416633771119*^9}, 3.416898358594*^9, 
   3.416898406552*^9, 3.416902779934*^9, 3.416903583559*^9, 
   3.417155562546*^9, {3.417237419899*^9, 3.4172374202469997`*^9}, {
   3.417237570934*^9, 3.417237572792*^9}, 3.4172387284849997`*^9, 
   3.417239034575*^9, {3.41831180219*^9, 3.4183118026429996`*^9}, 
   3.4183119797*^9, {3.418312044646*^9, 3.418312044767*^9}, {
   3.418314397318*^9, 3.418314397644*^9}, {3.418320056972*^9, 
   3.418320057611*^9}, {3.418360689082*^9, 3.41836068935*^9}, {
   3.486978765203906*^9, 3.4869787663895063`*^9}, {3.4869788859791307`*^9, 
   3.486978939892741*^9}, 3.4870562423385024`*^9, 3.487312033140133*^9, 
   3.4873128174458885`*^9, 3.487313307504386*^9, {3.487315082410339*^9, 
   3.4873150831279387`*^9}, {3.4874671002780232`*^9, 3.4874671014324236`*^9}, 
   3.4874684424710903`*^9, {3.4874824592376757`*^9, 3.48748247862848*^9}, {
   3.487487092594597*^9, 3.4874871264778037`*^9}, {3.4874873565310493`*^9, 
   3.4874873779186535`*^9}, {3.487487529394684*^9, 3.4874875300342836`*^9}, {
   3.487489181403812*^9, 3.4874891814662123`*^9}, {3.487489427852661*^9, 
   3.4874894279306607`*^9}, {3.487489539954283*^9, 3.4874895400322833`*^9}, 
   3.48748977591993*^9, {3.4874900146467776`*^9, 3.487490014989978*^9}, {
   3.487490205419215*^9, 3.487490205762416*^9}, {3.4876774260446196`*^9, 
   3.4876774268402195`*^9}, {3.48791671004177*^9, 3.487916720602972*^9}, {
   3.4879488444101553`*^9, 3.4879488486533566`*^9}, {3.48795223823763*^9, 
   3.48795223943883*^9}, {3.4879538305455465`*^9, 3.4879538317623463`*^9}, 
   3.4879553102682405`*^9, {3.4879888920788875`*^9, 3.4879888937948875`*^9}, {
   3.48801245320037*^9, 3.4880124540583696`*^9}, {3.490675016078125*^9, 
   3.49067501790625*^9}, {3.49067574790625*^9, 3.49067574796875*^9}, {
   3.490677570015625*^9, 3.490677570390625*^9}, 3.49067792665625*^9, 
   3.49068094721875*^9, {3.490683137421875*^9, 3.4906831448125*^9}, 
   3.49068361790625*^9, {3.490683966578125*^9, 3.49068396915625*^9}, {
   3.49068705096875*^9, 3.490687051109375*^9}, {3.49068741740625*^9, 
   3.490687417625*^9}, {3.490688865953125*^9, 3.490688866203125*^9}, {
   3.49068908140625*^9, 3.49068908146875*^9}, 3.49068933959375*^9, {
   3.490689374984375*^9, 3.490689375046875*^9}, 3.490689593609375*^9, 
   3.490690618375*^9, {3.490692674421875*^9, 3.49069267453125*^9}, 
   3.490692882578125*^9, {3.490692968015625*^9, 3.490692969328125*^9}, 
   3.490694233203125*^9, 3.49069460103125*^9, {3.490695309921875*^9, 
   3.49069533496875*^9}, 3.49069551153125*^9, {3.49069633828125*^9, 
   3.4906963384375*^9}, 3.490696786375*^9, {3.49069698996875*^9, 
   3.4906969900625*^9}, {3.4906970976875*^9, 3.49069709934375*^9}, {
   3.490697248609375*^9, 3.49069724871875*^9}, 3.49069736375*^9, {
   3.4906974846875*^9, 3.49069748478125*^9}, 3.490697581859375*^9, {
   3.490697795*^9, 3.490697795109375*^9}, 3.49069803175*^9, {
   3.49069809096875*^9, 3.49069809109375*^9}, 3.490698731234375*^9, {
   3.4906988039375*^9, 3.490698804046875*^9}, 3.490699014125*^9, {
   3.490699058921875*^9, 3.490699061796875*^9}, {3.490699250359375*^9, 
   3.490699250453125*^9}, {3.602058759241392*^9, 3.6020587594063945`*^9}, {
   3.602060483813882*^9, 3.6020604853389053`*^9}, {3.602067663370206*^9, 
   3.60206773850886*^9}}],

Cell[BoxData[
 DynamicBox[ToBoxes[
   Refresh[$CellContext`len = Transpose[
       Select[
        Import["energy.dat", "Table"], 0 < First[#]& ]]; $CellContext`ltm = 
     First[$CellContext`len]; {$CellContext`mp, $CellContext`mdp, \
$CellContext`mvx, $CellContext`mdvx, $CellContext`mvy, $CellContext`mdvy, \
$CellContext`mvz, $CellContext`mdvz, $CellContext`mAx, $CellContext`mdAx, \
$CellContext`mAy, $CellContext`mdAy, $CellContext`mAz, $CellContext`mdAz, \
$CellContext`mBx, $CellContext`mBy, $CellContext`mBz, $CellContext`mqp, \
$CellContext`mqvx, $CellContext`mqvy, $CellContext`mqvz, $CellContext`mqAx, \
$CellContext`mqAy, $CellContext`mqAz, $CellContext`mqBx, $CellContext`mqBy, \
$CellContext`mqBz} = Map[Transpose[{$CellContext`ltm, #}]& , 
       Drop[$CellContext`len, 2]]; ACPackages`ACGraphics`PrintRange[
      Map[{Part[#, 1]/3, 
        Log[10, 
         Part[#, 
          2]]}& , $CellContext`mqBx + $CellContext`mqBy + $CellContext`mqBz], 
      All, PlotLabel -> StringJoin["Last energy=", 
        ToString[
         Last[
          Last[$CellContext`mqBx + $CellContext`mqBy + $CellContext`mqBz]]]]],
     UpdateInterval -> 5], StandardForm],
  ImageSizeCache->{360., {111., 115.}}]], "Output",
 CellChangeTimes->{{3.6020677230386224`*^9, 3.602067738931367*^9}}]
}, Open  ]],

Cell[BoxData[{
 RowBox[{
  RowBox[{"len", "=", 
   RowBox[{"Transpose", "[", 
    RowBox[{"Select", "[", 
     RowBox[{
      RowBox[{"Import", "[", 
       RowBox[{"\"\<energy(0.00).dat\>\"", ",", "\"\<Table\>\""}], "]"}], ",", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"0", "<", 
         RowBox[{"First", "[", "#", "]"}]}], ")"}], "&"}]}], "]"}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"ltm", "=", 
    RowBox[{"First", "[", "len", "]"}]}], ";"}], 
  RowBox[{"(*", 
   RowBox[{"PrintRange", "[", 
    RowBox[{
     RowBox[{"dif", "[", "ltm", "]"}], ",", "All", ",", 
     RowBox[{"PlotLabel", "->", "\"\<Time step\>\""}]}], "]"}], 
   "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{
    RowBox[{"{", 
     RowBox[{
     "mp", ",", "mdp", ",", "mvx", ",", "mdvx", ",", "mvy", ",", "mdvy", ",", 
      "mvz", ",", "mdvz", ",", "mAx", ",", "mdAx", ",", "mAy", ",", "mdAy", 
      ",", "mAz", ",", "mdAz", ",", "mBx", ",", "mBy", ",", "mBz", ",", "mqp",
       ",", "mqvx", ",", "mqvy", ",", "mqvz", ",", "mqAx", ",", "mqAy", ",", 
      "mqAz", ",", "mqBx", ",", "mqBy", ",", "mqBz"}], "}"}], "=", 
    RowBox[{
     RowBox[{
      RowBox[{"Transpose", "[", 
       RowBox[{"{", 
        RowBox[{"ltm", ",", "#"}], "}"}], "]"}], "&"}], "/@", 
     RowBox[{"Drop", "[", 
      RowBox[{"len", ",", "2"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{"PrintRange", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"{", 
       RowBox[{
        RowBox[{
         RowBox[{"#", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], 
         "/", "3"}], ",", 
        RowBox[{"#", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}]}],
        "}"}], "&"}], "/@", 
     RowBox[{"(", 
      RowBox[{"mqvx", "+", "mqvy", "+", "mqvz"}], ")"}]}], "]"}], "*)"}], 
  "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{"PrintRange", "[", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{
          RowBox[{"#", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}],
           "/", "3"}], ",", 
         RowBox[{"Log", "[", 
          RowBox[{"10", ",", 
           RowBox[{
           "#", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}]}], 
          "]"}]}], "}"}], "&"}], "/@", 
      RowBox[{"(", 
       RowBox[{"mqAx", "+", "mqAy", "+", "mqAz"}], ")"}]}], ",", "All", ",", 
     RowBox[{"PlotLabel", "\[Rule]", 
      RowBox[{"\"\<Last energy=\>\"", "<>", 
       RowBox[{"ToString", "[", 
        RowBox[{"Last", "[", 
         RowBox[{"Last", "[", 
          RowBox[{"mqAx", "+", "mqAy", "+", "mqAz"}], "]"}], "]"}], 
        "]"}]}]}]}], "]"}], "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{"PrintRange", "[", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{
        RowBox[{"#", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], 
        "/", "3"}], ",", 
       RowBox[{"Log", "[", 
        RowBox[{"10", ",", 
         RowBox[{
         "#", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}]}], 
        "]"}]}], "}"}], "&"}], "/@", 
    RowBox[{"(", 
     RowBox[{"mqBx", "+", "mqBy", "+", "mqBz"}], ")"}]}], ",", "All", ",", 
   "\[IndentingNewLine]", 
   RowBox[{"PlotLabel", "\[Rule]", 
    RowBox[{"\"\<Last energy=\>\"", "<>", 
     RowBox[{"ToString", "[", 
      RowBox[{"Last", "[", 
       RowBox[{"Last", "[", 
        RowBox[{"mqBx", "+", "mqBy", "+", "mqBz"}], "]"}], "]"}], "]"}]}]}]}],
   "]"}]}], "Input",
 CellChangeTimes->{{3.395821810158*^9, 3.3958218234230003`*^9}, 
   3.395842386082*^9, {3.3959942473796*^9, 3.3959942775256*^9}, 
   3.3959990851589975`*^9, 3.408519827112*^9, {3.4085199685030003`*^9, 
   3.4085199721809998`*^9}, {3.408523680314*^9, 3.408523683005*^9}, {
   3.408523760568*^9, 3.408523763465*^9}, {3.408524195633*^9, 
   3.4085242044110003`*^9}, {3.409567684186*^9, 3.4095676869820004`*^9}, {
   3.411278618098*^9, 3.41127861859*^9}, {3.411278661243*^9, 
   3.411278661674*^9}, {3.4113750589110003`*^9, 3.41137505923*^9}, {
   3.411721744043*^9, 3.411721744212*^9}, 3.411814654814*^9, 3.4123412374*^9, 
   3.412341651447*^9, 3.4123574371549997`*^9, 3.4123581250039997`*^9, 
   3.412358262223*^9, 3.4123583164969997`*^9, {3.415640840615*^9, 
   3.4156408500810003`*^9}, {3.4162814919309998`*^9, 3.416281506709*^9}, 
   3.41655419221*^9, 3.416564140802*^9, {3.4165748570030003`*^9, 
   3.4165748869890003`*^9}, 3.416575273749*^9, 3.416575310836*^9, 
   3.416580366032*^9, 3.416580397729*^9, 3.416580578803*^9, {
   3.416633754105*^9, 3.416633771119*^9}, 3.416898358594*^9, 
   3.416898406552*^9, 3.416902779934*^9, 3.416903583559*^9, 
   3.417155562546*^9, {3.417237419899*^9, 3.4172374202469997`*^9}, {
   3.417237570934*^9, 3.417237572792*^9}, 3.4172387284849997`*^9, 
   3.417239034575*^9, {3.41831180219*^9, 3.4183118026429996`*^9}, 
   3.4183119797*^9, {3.418312044646*^9, 3.418312044767*^9}, {
   3.418314397318*^9, 3.418314397644*^9}, {3.418320056972*^9, 
   3.418320057611*^9}, {3.418360689082*^9, 3.41836068935*^9}, {
   3.486978765203906*^9, 3.4869787663895063`*^9}, {3.4869788859791307`*^9, 
   3.486978939892741*^9}, 3.4870562423385024`*^9, 3.487312033140133*^9, 
   3.4873128174458885`*^9, 3.487313307504386*^9, {3.487315082410339*^9, 
   3.4873150831279387`*^9}, {3.4874671002780232`*^9, 3.4874671014324236`*^9}, 
   3.4874684424710903`*^9, {3.4874824592376757`*^9, 3.48748247862848*^9}, {
   3.487487092594597*^9, 3.4874871264778037`*^9}, {3.4874873565310493`*^9, 
   3.4874873779186535`*^9}, {3.487487529394684*^9, 3.4874875300342836`*^9}, {
   3.487489181403812*^9, 3.4874891814662123`*^9}, {3.487489427852661*^9, 
   3.4874894279306607`*^9}, {3.487489539954283*^9, 3.4874895400322833`*^9}, 
   3.48748977591993*^9, {3.4874900146467776`*^9, 3.487490014989978*^9}, {
   3.487490205419215*^9, 3.487490205762416*^9}, {3.4876774260446196`*^9, 
   3.4876774268402195`*^9}, {3.48791671004177*^9, 3.487916720602972*^9}, {
   3.4879488444101553`*^9, 3.4879488486533566`*^9}, {3.48795223823763*^9, 
   3.48795223943883*^9}, {3.4879538305455465`*^9, 3.4879538317623463`*^9}, 
   3.4879553102682405`*^9, {3.4879888920788875`*^9, 3.4879888937948875`*^9}, {
   3.48801245320037*^9, 3.4880124540583696`*^9}, {3.490675016078125*^9, 
   3.49067501790625*^9}, {3.49067574790625*^9, 3.49067574796875*^9}, {
   3.490677570015625*^9, 3.490677570390625*^9}, 3.49067792665625*^9, 
   3.49068094721875*^9, {3.490683137421875*^9, 3.4906831448125*^9}, 
   3.49068361790625*^9, {3.490683966578125*^9, 3.49068396915625*^9}, {
   3.49068705096875*^9, 3.490687051109375*^9}, {3.49068741740625*^9, 
   3.490687417625*^9}, {3.490688865953125*^9, 3.490688866203125*^9}, {
   3.49068908140625*^9, 3.49068908146875*^9}, 3.49068933959375*^9, {
   3.490689374984375*^9, 3.490689375046875*^9}, 3.490689593609375*^9, 
   3.490690618375*^9, {3.490692674421875*^9, 3.49069267453125*^9}, 
   3.490692882578125*^9, {3.490692968015625*^9, 3.490692969328125*^9}, 
   3.490694233203125*^9, 3.49069460103125*^9, {3.490695309921875*^9, 
   3.49069533496875*^9}, 3.49069551153125*^9, {3.49069633828125*^9, 
   3.4906963384375*^9}, 3.490696786375*^9, {3.49069698996875*^9, 
   3.4906969900625*^9}, {3.4906970976875*^9, 3.49069709934375*^9}, {
   3.490697248609375*^9, 3.49069724871875*^9}, 3.49069736375*^9, {
   3.4906974846875*^9, 3.49069748478125*^9}, 3.490697581859375*^9, {
   3.490697795*^9, 3.490697795109375*^9}, 3.49069803175*^9, {
   3.49069809096875*^9, 3.49069809109375*^9}, 3.490698731234375*^9, {
   3.4906988039375*^9, 3.490698804046875*^9}, 3.490699014125*^9, {
   3.490699058921875*^9, 3.490699061796875*^9}, {3.490699250359375*^9, 
   3.490699250453125*^9}, {3.602058759241392*^9, 3.6020587594063945`*^9}, {
   3.602060483813882*^9, 3.6020604853389053`*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"HarmClearance", "[", "l_", "]"}], ":=", 
  RowBox[{"Divide", "@@", 
   RowBox[{"Take", "[", 
    RowBox[{
     RowBox[{"Sort", "[", 
      RowBox[{"Take", "[", 
       RowBox[{
        RowBox[{"Abs", "@", 
         RowBox[{"Fourier", "@", "l"}]}], ",", 
        RowBox[{"Ceiling", "[", 
         RowBox[{
          RowBox[{"Length", "[", "l", "]"}], "/", "2"}], "]"}]}], "]"}], 
      "]"}], ",", 
     RowBox[{"-", "2"}]}], "]"}]}]}]], "Input",
 CellChangeTimes->{{3.417190497507*^9, 3.417190593575*^9}}],

Cell[BoxData[{
 RowBox[{
  RowBox[{"out", "=."}], ";", 
  RowBox[{"ReadBinarySnapFile", "[", 
   RowBox[{"\"\<screw_64_2363.snp\>\"", ",", "6", ",", "out", ",", 
    RowBox[{"PrintInfo", "\[Rule]", "None"}]}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"{", 
    RowBox[{"coor", ",", "bounds"}], "}"}], "=", 
   RowBox[{"ReadAuxFiles", "[", 
    RowBox[{
     RowBox[{"{", "\"\<coord\>\"", "}"}], ",", 
     RowBox[{"ShiftVector", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"0", ",", "0", ",", "0"}], "}"}]}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"{", 
    RowBox[{"Bx", ",", "By", ",", "Bz"}], "}"}], "=", 
   RowBox[{"rotd", "[", 
    RowBox[{
     RowBox[{"Sequence", "@@", 
      RowBox[{"Take", "[", 
       RowBox[{"out", ",", 
        RowBox[{"-", "3"}]}], "]"}]}], ",", "3"}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"PrintRange", "[", 
  RowBox[{"WithoutFict", "@", 
   RowBox[{"Bx", "\[LeftDoubleBracket]", 
    RowBox[{"10", ",", "All", ",", "25"}], "\[RightDoubleBracket]"}]}], 
  "]"}], "\n", 
 RowBox[{"PrintRange", "[", 
  RowBox[{"Take", "[", 
   RowBox[{
    RowBox[{"Abs", "@", 
     RowBox[{"Fourier", "@", 
      RowBox[{"WithoutFict", "@", 
       RowBox[{"Bx", "\[LeftDoubleBracket]", 
        RowBox[{"15", ",", "All", ",", "15"}], 
        "\[RightDoubleBracket]"}]}]}]}], ",", "14"}], "]"}], 
  "]"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"-", "10"}], 
  RowBox[{"Log", "[", 
   RowBox[{"10", ",", 
    RowBox[{"HarmClearance", "[", 
     RowBox[{"WithoutFict", "@", 
      RowBox[{"Bx", "\[LeftDoubleBracket]", 
       RowBox[{"13", ",", "All", ",", "8"}], "\[RightDoubleBracket]"}]}], 
     "]"}]}], "]"}]}]}], "Input",
 CellChangeTimes->{{3.4168932787530003`*^9, 3.416893310177*^9}, {
   3.416893356575*^9, 3.4168933580299997`*^9}, {3.4168934265769997`*^9, 
   3.416893427936*^9}, {3.4168934610950003`*^9, 3.41689346249*^9}, {
   3.416893510848*^9, 3.416893512126*^9}, {3.416893600233*^9, 
   3.416893600987*^9}, {3.416897350363*^9, 3.416897351219*^9}, {
   3.416897396752*^9, 3.416897397564*^9}, {3.416897435906*^9, 
   3.41689743708*^9}, {3.416897557703*^9, 3.4168975610150003`*^9}, {
   3.416897607668*^9, 3.41689760994*^9}, {3.416897662266*^9, 
   3.416897662995*^9}, {3.416897713324*^9, 3.416897713815*^9}, {
   3.41689775876*^9, 3.416897759484*^9}, {3.416901316703*^9, 
   3.416901321855*^9}, {3.4169014916809998`*^9, 3.416901492336*^9}, {
   3.416901539367*^9, 3.416901541093*^9}, {3.416901581928*^9, 
   3.416901582817*^9}, {3.416902389617*^9, 3.416902389908*^9}, {
   3.4169025082860003`*^9, 3.416902509112*^9}, {3.416902667987*^9, 
   3.416902668585*^9}, {3.416902712559*^9, 3.416902713183*^9}, {
   3.416902838322*^9, 3.416902842392*^9}, {3.416902963605*^9, 
   3.4169029670699997`*^9}, {3.416903028328*^9, 3.416903030435*^9}, {
   3.416903128244*^9, 3.4169031288*^9}, {3.416903914105*^9, 
   3.416903921351*^9}, {3.416905052824*^9, 3.416905053308*^9}, {
   3.416905089525*^9, 3.4169050904820004`*^9}, {3.416905129442*^9, 
   3.416905130362*^9}, {3.417166387795*^9, 3.4171663969370003`*^9}, {
   3.417166493425*^9, 3.41716652281*^9}, {3.417166788781*^9, 
   3.417166789659*^9}, {3.417166825875*^9, 3.417166855376*^9}, {
   3.4171668894040003`*^9, 3.4171668952390003`*^9}, {3.41716694633*^9, 
   3.417166946962*^9}, {3.417167172865*^9, 3.41716717404*^9}, {
   3.417167214685*^9, 3.417167215458*^9}, {3.41716727838*^9, 
   3.417167279734*^9}, {3.417170118645*^9, 3.417170129892*^9}, {
   3.4171886939960003`*^9, 3.417188723474*^9}, {3.417188804421*^9, 
   3.4171888057469997`*^9}, {3.417189065896*^9, 3.4171890742460003`*^9}, {
   3.417190281043*^9, 3.4171902818269997`*^9}, {3.417190334684*^9, 
   3.417190335263*^9}, {3.4171903755150003`*^9, 3.417190376876*^9}, {
   3.417190436633*^9, 3.417190437014*^9}, {3.417190469052*^9, 
   3.417190469894*^9}, {3.4171909766289997`*^9, 3.4171909973269997`*^9}, {
   3.417191039057*^9, 3.41719104626*^9}, {3.417191147573*^9, 
   3.417191183683*^9}, {3.417191243648*^9, 3.417191249326*^9}, {
   3.417191340057*^9, 3.417191347793*^9}, {3.417191414394*^9, 
   3.417191416282*^9}, 3.4171914527720003`*^9, 3.417191609432*^9, 
   3.41719167385*^9, {3.4171927305620003`*^9, 3.417192744565*^9}, {
   3.417194019288*^9, 3.417194020585*^9}, {3.417194080276*^9, 
   3.417194082685*^9}, {3.417194144224*^9, 3.417194145652*^9}, {
   3.417194224387*^9, 3.417194225068*^9}, {3.4171942943929996`*^9, 
   3.417194295899*^9}, {3.41719439088*^9, 3.417194402822*^9}, {
   3.417194576637*^9, 3.417194629508*^9}, {3.417194714175*^9, 
   3.417194715257*^9}, {3.4171947594449997`*^9, 3.417194760074*^9}, {
   3.417238657159*^9, 3.417238658186*^9}, {3.417238791909*^9, 
   3.417238792645*^9}, {3.417241266648*^9, 3.4172412992650003`*^9}, {
   3.417241404859*^9, 3.417241420243*^9}, {3.417241455935*^9, 
   3.417241476969*^9}, {3.417241513532*^9, 3.417241514553*^9}, {
   3.417241549896*^9, 3.417241580917*^9}, {3.41724316705*^9, 
   3.417243187179*^9}, {3.417243500422*^9, 3.417243501171*^9}, {
   3.417243565709*^9, 3.4172435667939997`*^9}, {3.417246165874*^9, 
   3.4172461668929996`*^9}, {3.417400684486*^9, 3.417400695677*^9}, {
   3.41740132946*^9, 3.4174013311730003`*^9}, {3.417401367907*^9, 
   3.4174013704440002`*^9}, {3.417408632582*^9, 3.417408633585*^9}, {
   3.417408996074*^9, 3.4174089965950003`*^9}, {3.417409084583*^9, 
   3.417409085342*^9}, {3.417409237842*^9, 3.417409238301*^9}, {
   3.417409599842*^9, 3.4174096003*^9}, {3.4174122300039997`*^9, 
   3.417412239084*^9}, {3.4174122747320004`*^9, 3.417412276196*^9}, {
   3.417412406837*^9, 3.4174124073570004`*^9}, {3.417412475276*^9, 
   3.417412475675*^9}, {3.417412844256*^9, 3.417412845104*^9}, {
   3.417412885106*^9, 3.417412886146*^9}, {3.417412933258*^9, 
   3.417412933925*^9}, {3.417413002016*^9, 3.417413002875*^9}, {
   3.4174131475039997`*^9, 3.417413148609*^9}, {3.417413346546*^9, 
   3.417413347329*^9}, {3.417413424057*^9, 3.417413426501*^9}, {
   3.417413467961*^9, 3.417413468685*^9}, {3.417495831075*^9, 
   3.417495870111*^9}, {3.417496145585*^9, 3.417496146398*^9}, {
   3.417496462142*^9, 3.417496470675*^9}, {3.4174965301730003`*^9, 
   3.4174965308970003`*^9}, {3.417496808558*^9, 3.417496809262*^9}, {
   3.417496975342*^9, 3.417496975784*^9}, {3.4181168474738736`*^9, 
   3.418116847854912*^9}, {3.4181204414072313`*^9, 3.418120442671357*^9}, {
   3.4181205128323727`*^9, 3.418120513813471*^9}, {3.418312104799*^9, 
   3.418312105984*^9}, {3.4183121394849997`*^9, 3.4183122199639997`*^9}, {
   3.418313644446*^9, 3.41831364502*^9}, {3.418314010401*^9, 
   3.418314010948*^9}, {3.418314043467*^9, 3.418314043773*^9}, {
   3.418314166567*^9, 3.4183141677469997`*^9}, {3.4183144146400003`*^9, 
   3.418314432605*^9}, {3.418314566177*^9, 3.418314566336*^9}, {
   3.418314873432*^9, 3.4183148894379997`*^9}, {3.418317629112*^9, 
   3.418317636609*^9}, {3.41831767238*^9, 3.4183176747209997`*^9}, 
   3.418317761332*^9, {3.4183177921879997`*^9, 3.418317793574*^9}, {
   3.418317981429*^9, 3.418317982256*^9}, {3.418320860885*^9, 
   3.418320877211*^9}, {3.418321170204*^9, 3.418321171558*^9}, {
   3.418360710135*^9, 3.418360711539*^9}, {3.418360904198*^9, 
   3.418360904832*^9}, {3.4183612356800003`*^9, 3.418361236967*^9}, {
   3.418371412498*^9, 3.4183714140769997`*^9}, {3.418371493172*^9, 
   3.41837149349*^9}, {3.418371854012*^9, 3.4183718543059998`*^9}, {
   3.4183721141070004`*^9, 3.418372114852*^9}, {3.41837234535*^9, 
   3.418372346135*^9}, {3.418376956*^9, 3.41837696074*^9}, {3.418377056781*^9,
    3.418377057248*^9}, {3.418443754201*^9, 3.418443755117*^9}, {
   3.418443925513*^9, 3.418443926304*^9}, {3.418444034332*^9, 
   3.418444034892*^9}, {3.418444103564*^9, 3.4184441045299997`*^9}, {
   3.418446288101*^9, 3.418446294979*^9}, {3.4184463902860003`*^9, 
   3.418446391821*^9}, {3.418448238492*^9, 3.418448239226*^9}, {
   3.418448321111*^9, 3.41844832212*^9}, {3.418448710557*^9, 
   3.418448711024*^9}, {3.418449035873*^9, 3.4184490378789997`*^9}, {
   3.418449423385*^9, 3.418449424766*^9}, {3.418449503663*^9, 
   3.4184495043900003`*^9}, {3.418450144701*^9, 3.41845014517*^9}, {
   3.418535000133563*^9, 3.4185350003075633`*^9}, {3.418535085191563*^9, 
   3.4185350933915634`*^9}, {3.4185351999655633`*^9, 3.418535200633563*^9}, {
   3.4185353705805635`*^9, 3.418535371491563*^9}, {3.418535426968563*^9, 
   3.418535427823563*^9}, {3.418535537585563*^9, 3.418535538244563*^9}, {
   3.4185402353255634`*^9, 3.4185402417225633`*^9}, {3.418540508008563*^9, 
   3.418540509197563*^9}, {3.453572071035*^9, 3.4535720821029997`*^9}, {
   3.4535770746542*^9, 3.4535770787882*^9}, {3.4536108440810003`*^9, 
   3.4536108448766003`*^9}, {3.4536119204498*^9, 3.4536119310109997`*^9}, {
   3.453622552828125*^9, 3.453622553640625*^9}, {3.453623604578125*^9, 
   3.45362360540625*^9}, {3.49067605525*^9, 3.490676081*^9}, {
   3.49067748015625*^9, 3.490677492609375*^9}, {3.490678168640625*^9, 
   3.490678187109375*^9}, {3.49068479796875*^9, 3.490684804484375*^9}, {
   3.490688014890625*^9, 3.490688024515625*^9}, {3.490688117390625*^9, 
   3.49068811825*^9}, {3.49068815996875*^9, 3.49068816040625*^9}, {
   3.490688341046875*^9, 3.4906883414375*^9}, {3.490688391203125*^9, 
   3.4906883918125*^9}, {3.490688776109375*^9, 3.490688776515625*^9}, {
   3.490688988453125*^9, 3.49068898896875*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"EstimateBoundary", "/@", 
  RowBox[{"{", 
   RowBox[{"Bx", ",", "By", ",", "Bz"}], "}"}]}]], "Input",
 CellChangeTimes->{{3.4183126759849997`*^9, 3.418312693566*^9}, {
  3.418312840145*^9, 3.418312852071*^9}, {3.418313497415*^9, 
  3.4183135033640003`*^9}, {3.4183135400220003`*^9, 3.418313551764*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "63.41286514327`", ",", "410.987197064277`", ",", "127.97320261669266`"}], 
  "}"}]], "Output",
 CellChangeTimes->{3.418444119821*^9, 3.4184463192320004`*^9, 
  3.418448262289*^9, 3.4184488418459997`*^9, 3.4184490708929996`*^9, 
  3.418449471528*^9, 3.4184495272460003`*^9, 3.4184509208570004`*^9, 
  3.418535128875563*^9, 3.418535228982563*^9, 3.4185353967005634`*^9, 
  3.4185354560565634`*^9, 3.418535563048563*^9, 3.418540532866563*^9, 
  3.4535728690030003`*^9, 3.453577109099*^9, 3.4536108749533997`*^9, 
  3.4591472995*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{"MapThread", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"PrintRange", "[", 
     RowBox[{"#1", ",", "All", ",", 
      RowBox[{"PlotLabel", "\[Rule]", "#2"}]}], "]"}], "&"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"mqvx", ",", "mqvy", ",", "mqvz", ",", "mqp"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{
      "\"\<Mean quadratic of vr\>\"", ",", 
       "\"\<Mean quadratic of v\[Phi]\>\"", ",", 
       "\"\<Mean quadratic of vz\>\"", ",", "\"\<Mean quadratic of p\>\""}], 
      "}"}]}], "}"}]}], "]"}]], "Input",
 CellChangeTimes->{3.3958218286099997`*^9}],

Cell[BoxData[
 RowBox[{"grs", "=", 
  RowBox[{"MapThread", "[", 
   RowBox[{
    RowBox[{
     RowBox[{"PrintRange", "[", 
      RowBox[{"#1", ",", "All", ",", 
       RowBox[{"PlotLabel", "\[Rule]", "#2"}]}], "]"}], "&"}], ",", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{"Map", "[", 
         RowBox[{
          RowBox[{"Function", "[", 
           RowBox[{"l", ",", 
            RowBox[{"{", 
             RowBox[{
              RowBox[{
              "l", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], 
              ",", 
              FractionBox[
               RowBox[{"Log", "[", 
                RowBox[{
                "l", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], 
                "]"}], "2"]}], "}"}]}], "]"}], ",", "#"}], "]"}], "&"}], "/@", 
       RowBox[{"{", 
        RowBox[{"mqAx", ",", "mqAy", ",", "mqAz"}], "}"}]}], ",", 
      RowBox[{"{", 
       RowBox[{
       "\"\<Mean quadratic of Ar\>\"", ",", 
        "\"\<Mean quadratic of A\[Phi]\>\"", ",", 
        "\"\<Mean quadratic of Az\>\""}], "}"}]}], "}"}]}], "]"}]}]], "Input",
 CellChangeTimes->{3.395821832632*^9}],

Cell[BoxData[
 RowBox[{"MapThread", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"PrintRange", "[", 
     RowBox[{"#1", ",", "All", ",", 
      RowBox[{"PlotLabel", "\[Rule]", "#2"}]}], "]"}], "&"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"Map", "[", 
        RowBox[{
         RowBox[{"Function", "[", 
          RowBox[{"l", ",", 
           RowBox[{"{", 
            RowBox[{
             RowBox[{
             "l", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], ",", 
             FractionBox[
              RowBox[{"Log", "[", 
               RowBox[{"Abs", "[", 
                RowBox[{
                "l", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], 
                "]"}], "]"}], "2"]}], "}"}]}], "]"}], ",", "#"}], "]"}], 
       "&"}], "/@", 
      RowBox[{"{", 
       RowBox[{"mdAx", ",", "mdAy", ",", "mdAz"}], "}"}]}], ",", 
     RowBox[{"{", 
      RowBox[{
      "\"\<Difference of Ar\>\"", ",", "\"\<Difference of A\[Phi]\>\"", ",", 
       "\"\<Difference of Az\>\""}], "}"}]}], "}"}]}], "]"}]], "Input",
 CellChangeTimes->{
  3.3958218366619997`*^9, {3.417403800567*^9, 3.417403802439*^9}}],

Cell[BoxData[
 RowBox[{"grs", "=", 
  RowBox[{"MapThread", "[", 
   RowBox[{
    RowBox[{
     RowBox[{"PrintRange", "[", 
      RowBox[{"#1", ",", 
       RowBox[{"0.01", 
        RowBox[{"{", 
         RowBox[{
          RowBox[{"-", "1"}], ",", "1"}], "}"}]}], ",", 
       RowBox[{"PlotLabel", "\[Rule]", "#2"}]}], "]"}], "&"}], ",", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{"dif", "[", 
         RowBox[{"Map", "[", 
          RowBox[{
           RowBox[{"Function", "[", 
            RowBox[{"l", ",", 
             RowBox[{"{", 
              RowBox[{
               RowBox[{
               "l", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], 
               ",", 
               FractionBox[
                RowBox[{"Log", "[", 
                 RowBox[{
                 "l", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], 
                 "]"}], "2"]}], "}"}]}], "]"}], ",", "#"}], "]"}], "]"}], 
        "&"}], "/@", 
       RowBox[{"{", 
        RowBox[{"mqBx", ",", "mqBy", ",", "mqBz"}], "}"}]}], ",", 
      RowBox[{"{", 
       RowBox[{
       "\"\<Mean quadratic of Br\>\"", ",", 
        "\"\<Mean quadratic of B\[Phi]\>\"", ",", 
        "\"\<Mean quadratic of Bz\>\""}], "}"}]}], "}"}]}], "]"}]}]], "Input",
 CellChangeTimes->{
  3.395821840993*^9, {3.4546720825625*^9, 3.454672094203125*^9}, {
   3.490675030828125*^9, 3.49067506071875*^9}, {3.490677933546875*^9, 
   3.490677936375*^9}, {3.49069097321875*^9, 3.49069097565625*^9}, {
   3.4906929360625*^9, 3.490692936328125*^9}, 3.490695317609375*^9, {
   3.49069672678125*^9, 3.490696726953125*^9}, 3.490696993484375*^9, 
   3.49069731178125*^9, {3.49069789278125*^9, 3.49069789640625*^9}, {
   3.490698062609375*^9, 3.4906980628125*^9}, {3.49069906878125*^9, 
   3.490699069765625*^9}}],

Cell[BoxData[
 RowBox[{"grs", "=", 
  RowBox[{"MapThread", "[", 
   RowBox[{
    RowBox[{
     RowBox[{"PrintRange", "[", 
      RowBox[{"#1", ",", "All", ",", 
       RowBox[{"PlotLabel", "\[Rule]", "#2"}]}], "]"}], "&"}], ",", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{"Map", "[", 
         RowBox[{
          RowBox[{"Function", "[", 
           RowBox[{"l", ",", 
            RowBox[{"{", 
             RowBox[{
              RowBox[{
              "l", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], 
              ",", 
              RowBox[{"Log", "[", 
               RowBox[{"Abs", "[", 
                RowBox[{
                "l", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], 
                "]"}], "]"}]}], "}"}]}], "]"}], ",", "#"}], "]"}], "&"}], "/@", 
       RowBox[{"{", 
        RowBox[{"mAx", ",", "mAy", ",", "mAz"}], "}"}]}], ",", 
      RowBox[{"{", 
       RowBox[{
       "\"\<Maximum of Ar\>\"", ",", "\"\<Maximum of A\[Phi]\>\"", ",", 
        "\"\<Maximum of Az\>\""}], "}"}]}], "}"}]}], "]"}]}]], "Input",
 CellChangeTimes->{3.395821842606*^9}],

Cell[BoxData[
 RowBox[{"ListPlot", "[", "mBy", "]"}]], "Input",
 CellChangeTimes->{{3.4880885764808965`*^9, 3.4880885853416986`*^9}, {
   3.488089322145445*^9, 3.4880893276522455`*^9}, {3.4880948917677517`*^9, 
   3.4880948948253517`*^9}, 3.49068316621875*^9, {3.490692924140625*^9, 
   3.49069292896875*^9}, {3.4906987429375*^9, 3.490698743984375*^9}}],

Cell[BoxData[
 RowBox[{"grs", "=", 
  RowBox[{"MapThread", "[", 
   RowBox[{
    RowBox[{
     RowBox[{"PrintRange", "[", 
      RowBox[{"#1", ",", "All", ",", 
       RowBox[{"PlotLabel", "\[Rule]", "#2"}]}], "]"}], "&"}], ",", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{
       RowBox[{
        RowBox[{"Map", "[", 
         RowBox[{
          RowBox[{"Function", "[", 
           RowBox[{"l", ",", 
            RowBox[{"{", 
             RowBox[{
              RowBox[{
              "l", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], 
              ",", 
              RowBox[{"Log", "[", 
               RowBox[{"10", ",", 
                RowBox[{"Abs", "[", 
                 RowBox[{
                 "l", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], 
                 "]"}]}], "]"}]}], "}"}]}], "]"}], ",", "#"}], "]"}], "&"}], "/@", 
       RowBox[{"{", 
        RowBox[{"mBx", ",", "mBy", ",", "mBz"}], "}"}]}], ",", 
      RowBox[{"{", 
       RowBox[{
       "\"\<Maximum of Br\>\"", ",", "\"\<Maximum of B\[Phi]\>\"", ",", 
        "\"\<Maximum of Bz\>\""}], "}"}]}], "}"}]}], "]"}]}]], "Input",
 CellChangeTimes->{3.395821844674*^9, {3.395846857821*^9, 3.395846858201*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell["\:0427\:0442\:0435\:043d\:0438\:0435 \:0438\:0437 \:0444\:0430\:0439\
\:043b\:043e\:0432", "Subsubsection",
 CellChangeTimes->{{3.459149095515625*^9, 3.4591490973125*^9}}],

Cell[BoxData[
 RowBox[{"Remove", "[", "PrintInfo", "]"}]], "Input",
 CellChangeTimes->{{3.411238235457*^9, 3.411238243344*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"{", 
    RowBox[{"coor", ",", "bounds"}], "}"}], "=", 
   RowBox[{"ReadAuxFiles", "[", 
    RowBox[{
     RowBox[{"{", "\"\<coord\>\"", "}"}], ",", 
     RowBox[{"ShiftVector", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], ",", 
     RowBox[{"NumberOfRefs", "\[Rule]", "4"}]}], "]"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.459161754171875*^9, 3.459161763125*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"out", "=."}], ";", 
  RowBox[{"ReadBinarySnapFile", "[", 
   RowBox[{"\"\<screw.dmp\>\"", ",", "8", ",", "out", ",", 
    RowBox[{"PrintInfo", "\[Rule]", "Debug"}]}], "]"}], ";"}]], "Input",
 CellChangeTimes->{{3.435648378957375*^9, 3.43564840156675*^9}, {
  3.435662675176125*^9, 3.43566267581675*^9}, {3.435904557988625*^9, 
  3.435904558676125*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"1", ",", "1", ",", "2"}], "}"}]], "Print",
 CellChangeTimes->{3.4359045590355*^9, 3.43590989531675*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"0.`", ",", "0", ",", "32", ",", "32", ",", "32", ",", "1000.`"}], 
  "}"}]], "Print",
 CellChangeTimes->{3.4359045590355*^9, 3.43590989531675*^9}],

Cell[BoxData[
 InterpretationBox[
  RowBox[{"\<\"Length of read from binary=\"\>", "\[InvisibleSpace]", 
   "508288", "\[InvisibleSpace]", "\<\" and size of it=\"\>", 
   "\[InvisibleSpace]", "2033152", "\[InvisibleSpace]", "\<\" bytes\"\>"}],
  SequenceForm[
  "Length of read from binary=", 508288, " and size of it=", 2033152, 
   " bytes"],
  Editable->False]], "Print",
 CellChangeTimes->{3.4359045590355*^9, 3.43590989531675*^9}],

Cell[BoxData[
 InterpretationBox[
  RowBox[{"\<\"ghost=\"\>", "\[InvisibleSpace]", "3"}],
  SequenceForm["ghost=", 3],
  Editable->False]], "Print",
 CellChangeTimes->{3.4359045590355*^9, 3.435909895332375*^9}]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"out", "=."}], ";", 
  RowBox[{"ReadBinarySnapFile", "[", 
   RowBox[{"\"\<velocity.snp\>\"", ",", "4", ",", "out", ",", 
    RowBox[{"PrintInfo", "\[Rule]", "Debug"}]}], "]"}], ";"}]], "Input",
 CellChangeTimes->{3.45916144984375*^9, {3.4591616373125*^9, 3.4591616525*^9}}
  ],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"1", ",", "1", ",", "1"}], "}"}]], "Print",
 CellChangeTimes->{{3.202039929499125*^9, 3.202039936936625*^9}, {
   3.459161427703125*^9, 3.45916144996875*^9}, {3.459161633703125*^9, 
   3.459161652734375*^9}, 3.459162377640625*^9, 3.486887373184875*^9, {
   3.486887784216125*^9, 3.486887795388*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"0.`", ",", "0", ",", "64", ",", "64", ",", "64", ",", "3.14`"}], 
  "}"}]], "Print",
 CellChangeTimes->{{3.202039929499125*^9, 3.202039936936625*^9}, {
   3.459161427703125*^9, 3.45916144996875*^9}, {3.459161633703125*^9, 
   3.459161652734375*^9}, 3.459162377640625*^9, 3.486887373184875*^9, {
   3.486887784216125*^9, 3.486887795388*^9}}],

Cell[BoxData[
 InterpretationBox[
  RowBox[{"\<\"Length of read from binary=\"\>", "\[InvisibleSpace]", 
   "1372000", "\[InvisibleSpace]", "\<\" and size of it=\"\>", 
   "\[InvisibleSpace]", "5488000", "\[InvisibleSpace]", "\<\" bytes\"\>"}],
  SequenceForm[
  "Length of read from binary=", 1372000, " and size of it=", 5488000, 
   " bytes"],
  Editable->False]], "Print",
 CellChangeTimes->{{3.202039929499125*^9, 3.202039936936625*^9}, {
   3.459161427703125*^9, 3.45916144996875*^9}, {3.459161633703125*^9, 
   3.459161652734375*^9}, 3.459162377640625*^9, 3.486887373184875*^9, {
   3.486887784216125*^9, 3.486887795388*^9}}],

Cell[BoxData[
 InterpretationBox[
  RowBox[{"\<\"ghost=\"\>", "\[InvisibleSpace]", "3"}],
  SequenceForm["ghost=", 3],
  Editable->False]], "Print",
 CellChangeTimes->{{3.202039929499125*^9, 3.202039936936625*^9}, {
   3.459161427703125*^9, 3.45916144996875*^9}, {3.459161633703125*^9, 
   3.459161652734375*^9}, 3.459162377640625*^9, 3.486887373184875*^9, {
   3.486887784216125*^9, 3.486887795403625*^9}}]
}, Open  ]]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"{", 
    RowBox[{"coor", ",", "bounds", ",", "node"}], "}"}], "=", 
   RowBox[{"ReadAuxFiles", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"\"\<coord\>\"", ",", "\"\<node\>\""}], "}"}], ",", 
     RowBox[{"ShiftVector", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"0", ",", "0", ",", "0"}], "}"}]}], ",", 
     RowBox[{"ProcDistrib", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"1", ",", "1", ",", "1"}], "}"}]}], ",", 
     RowBox[{"NumberOfRefs", "\[Rule]", "4"}]}], "]"}]}], ";"}]], "Input",
 CellChangeTimes->{3.486887417997375*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"GetCoor", "[", 
   RowBox[{"a_", ",", "b_", ",", "n_", ",", "ghost_"}], "]"}], ":=", 
  RowBox[{"Block", "[", 
   RowBox[{
    RowBox[{"{", "dx", "}"}], ",", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"dx", "=", 
      FractionBox[
       RowBox[{"(", 
        RowBox[{"b", "-", "a"}], ")"}], "n"]}], ";", "\[IndentingNewLine]", 
     RowBox[{"Table", "[", 
      RowBox[{
       RowBox[{"a", "+", 
        RowBox[{"i", " ", "dx"}]}], ",", 
       RowBox[{"{", 
        RowBox[{"i", ",", 
         RowBox[{"0.5", "-", "ghost"}], ",", 
         RowBox[{"n", "+", "ghost", "-", "0.5"}], ",", "1"}], "}"}]}], 
      "]"}]}]}], "\[IndentingNewLine]", "]"}]}]], "Input",
 CellChangeTimes->{{3.490678467671875*^9, 3.49067846871875*^9}}],

Cell[BoxData[{
 RowBox[{
  RowBox[{"\[Kappa]", "=", "0"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"parR", "=", "2"}], ";", 
  RowBox[{"parRfl", "=", "1"}], ";", 
  RowBox[{"lfi", "=", 
   RowBox[{"2", 
    RowBox[{"\[Pi]", "/", "0.685"}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"coor", "=", 
   RowBox[{"MapThread", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"GetCoor", "[", 
       RowBox[{"#1", ",", "#2", ",", "#3", ",", "ghost"}], "]"}], "&"}], ",", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{
           RowBox[{"-", "parR"}], "+", 
           RowBox[{"parRfl", "/", 
            RowBox[{"If", "[", 
             RowBox[{
              RowBox[{"\[Kappa]", "\[Equal]", "0"}], ",", "\[Infinity]"}], 
             "]"}]}]}], ")"}], ",", "0", ",", 
         RowBox[{"-", "parR"}]}], "}"}], ",", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"(", 
          RowBox[{"parR", "+", 
           RowBox[{"parRfl", "/", 
            RowBox[{"If", "[", 
             RowBox[{
              RowBox[{"\[Kappa]", "\[Equal]", "0"}], ",", "\[Infinity]"}], 
             "]"}]}]}], ")"}], ",", "lfi", ",", "parR"}], "}"}], ",", 
       RowBox[{
        RowBox[{"Rest", "[", 
         RowBox[{"Dimensions", "[", "out", "]"}], "]"}], "-", 
        RowBox[{"2", "ghost"}]}]}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{"bounds", "=", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{
        RowBox[{"#", "[", 
         RowBox[{"[", "ghost", "]"}], "]"}], "+", 
        RowBox[{"#", "[", 
         RowBox[{"[", 
          RowBox[{"ghost", "+", "1"}], "]"}], "]"}]}], ",", 
       RowBox[{
        RowBox[{"#", "[", 
         RowBox[{"[", 
          RowBox[{"-", "ghost"}], "]"}], "]"}], "+", 
        RowBox[{"#", "[", 
         RowBox[{"[", 
          RowBox[{
           RowBox[{"-", "ghost"}], "-", "1"}], "]"}], "]"}]}]}], "}"}], "/", 
     "2"}], "&"}], "/@", "coor"}]}]}], "Input",
 CellChangeTimes->{{3.49067854628125*^9, 3.49067864328125*^9}}],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"out", "=."}], ";", 
  RowBox[{"ReadBinarySnapFile", "[", 
   RowBox[{"\"\<induct_4_851.snp\>\"", ",", "6", ",", "out", ",", 
    RowBox[{"PrintInfo", "\[Rule]", "Debug"}]}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"{", 
    RowBox[{"coor", ",", "bounds", ",", "node"}], "}"}], "=", 
   RowBox[{"ReadAuxFiles", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"\"\<coord\>\"", ",", "\"\<node\>\""}], "}"}], ",", 
     RowBox[{"ShiftVector", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"1", "/", "0.3"}], ",", "0", ",", "0"}], "}"}]}], ",", 
     RowBox[{"ProcDistrib", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"2", ",", "1", ",", "2"}], "}"}]}], ",", 
     RowBox[{"NumberOfRefs", "\[Rule]", "4"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Print", "[", "bounds", "]"}], ";"}]}], "Input",
 CellChangeTimes->{{3.41426573491*^9, 3.414265768815*^9}, {3.414265821932*^9, 
   3.4142658610950003`*^9}, {3.414266022685*^9, 3.414266059477*^9}, {
   3.414266168413*^9, 3.4142661690369997`*^9}, 3.4155116310699997`*^9, {
   3.4155118271470003`*^9, 3.4155118281800003`*^9}, {3.415522596466*^9, 
   3.415522597726*^9}, {3.415523060079*^9, 3.415523061079*^9}, {
   3.4155234460290003`*^9, 3.415523480166*^9}, 3.415527135475*^9, {
   3.415639688885*^9, 3.415639693382*^9}, 3.415640560664*^9, {
   3.4156406375179996`*^9, 3.415640638584*^9}, {3.4156974747051687`*^9, 
   3.415697484582156*^9}, 3.4156976547421703`*^9, {3.415697734835179*^9, 
   3.4156977351312084`*^9}, {3.4156979618448772`*^9, 3.415697974111104*^9}, 
   3.4156990289565783`*^9, {3.416284708302*^9, 3.416284712821*^9}, 
   3.4171663445439997`*^9, 3.417191577342*^9, {3.435648332848*^9, 
   3.43564833394175*^9}, {3.435663919019875*^9, 3.435663929457375*^9}, 
   3.435664699769875*^9, {3.435664739394875*^9, 3.435664764769875*^9}, {
   3.4359046305355*^9, 3.435904640582375*^9}, 3.435909266098*^9, {
   3.45914699925*^9, 3.45914700390625*^9}, 3.45914792309375*^9, 
   3.45914805209375*^9, {3.459148228625*^9, 3.45914823021875*^9}, {
   3.459162192625*^9, 3.45916220909375*^9}, {3.461495536109375*^9, 
   3.46149556596875*^9}, {3.486887880263*^9, 3.4868879033255*^9}, {
   3.48688809498175*^9, 3.486888095638*^9}, {3.487317579684875*^9, 
   3.48731759166925*^9}, {3.4906751253125*^9, 3.490675136890625*^9}, {
   3.49068040459375*^9, 3.490680407109375*^9}, {3.4906815753125*^9, 
   3.4906815758125*^9}, {3.49068467225*^9, 3.4906846835*^9}, {
   3.602060555002976*^9, 3.602060609841819*^9}, {3.602062477963546*^9, 
   3.6020624801035786`*^9}, {3.60206806531888*^9, 3.6020680707189627`*^9}, {
   3.602069182793049*^9, 3.6020691832255554`*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"2", ",", "1", ",", "2"}], "}"}]], "Print",
 CellChangeTimes->{
  3.490680409046875*^9, 3.4906815760625*^9, 3.490684683703125*^9, {
   3.602060592666555*^9, 3.60206060732178*^9}, {3.602062473010969*^9, 
   3.6020624784135523`*^9}, 3.6020680710939684`*^9, 3.6020691842605715`*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "4.0028398426`", ",", "851", ",", "32", ",", "5", ",", "32", ",", "10.`"}], 
  "}"}]], "Print",
 CellChangeTimes->{
  3.490680409046875*^9, 3.4906815760625*^9, 3.490684683703125*^9, {
   3.602060592666555*^9, 3.60206060732178*^9}, {3.602062473010969*^9, 
   3.6020624784135523`*^9}, 3.6020680710939684`*^9, 3.602069184265571*^9}],

Cell[BoxData[
 InterpretationBox[
  RowBox[{"\<\"Length of read from binary=\"\>", "\[InvisibleSpace]", 
   "127776", "\[InvisibleSpace]", "\<\" and size of it=\"\>", 
   "\[InvisibleSpace]", "511104", "\[InvisibleSpace]", "\<\" bytes\"\>"}],
  SequenceForm[
  "Length of read from binary=", 127776, " and size of it=", 511104, " bytes"],
  Editable->False]], "Print",
 CellChangeTimes->{
  3.490680409046875*^9, 3.4906815760625*^9, 3.490684683703125*^9, {
   3.602060592666555*^9, 3.60206060732178*^9}, {3.602062473010969*^9, 
   3.6020624784135523`*^9}, 3.6020680710939684`*^9, 3.602069184268071*^9}],

Cell[BoxData[
 InterpretationBox[
  RowBox[{"\<\"ghost=\"\>", "\[InvisibleSpace]", "3"}],
  SequenceForm["ghost=", 3],
  Editable->False]], "Print",
 CellChangeTimes->{
  3.490680409046875*^9, 3.4906815760625*^9, 3.490684683703125*^9, {
   3.602060592666555*^9, 3.60206060732178*^9}, {3.602062473010969*^9, 
   3.6020624784135523`*^9}, 3.6020680710939684`*^9, 3.602069184270571*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"1.3333333333333335`", ",", "5.333333333333334`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.`", ",", "1.`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "2.`"}], ",", "2.`"}], "}"}]}], "}"}]], "Print",
 CellChangeTimes->{
  3.490680409046875*^9, 3.4906815760625*^9, 3.490684683703125*^9, {
   3.602060592666555*^9, 3.60206060732178*^9}, {3.602062473010969*^9, 
   3.6020624784135523`*^9}, 3.6020680710939684`*^9, 3.602069185818095*^9}]
}, Open  ]]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"If", "[", 
   RowBox[{
    RowBox[{
     RowBox[{"Length", "[", "out", "]"}], ">", "6"}], ",", 
    RowBox[{"out", "=", 
     RowBox[{"Take", "[", 
      RowBox[{"out", ",", 
       RowBox[{"{", 
        RowBox[{"2", ",", 
         RowBox[{"-", "2"}]}], "}"}]}], "]"}]}]}], "]"}], ";"}]], "Input",
 CellChangeTimes->{{3.414266143131*^9, 3.41426615226*^9}, {3.415523070854*^9, 
  3.415523078217*^9}}],

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"out", "=."}], ";", 
   RowBox[{"ReadBinarySnapFiles", "[", 
    RowBox[{"\"\<induct\>\"", ",", "\"\<.dmp\>\"", ",", "8", ",", "out", ",", 
     RowBox[{"PrintInfo", "\[Rule]", "None"}]}], "]"}], ";"}], 
  "\[IndentingNewLine]", 
  RowBox[{"(*", 
   RowBox[{
    RowBox[{
     RowBox[{"{", 
      RowBox[{"vx", ",", "vy", ",", "vz", ",", "Ax", ",", "Ay", ",", "Az"}], 
      "}"}], "=", "out"}], ";"}], "*)"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"{", 
    RowBox[{"coor", ",", "bounds", ",", "node"}], "}"}], "=", 
   RowBox[{"ReadAuxFiles", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"\"\<coord\>\"", ",", "\"\<node\>\""}], "}"}], ",", 
     RowBox[{"ShiftVector", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"1", "/", "0.3"}], ",", "0", ",", "0"}], "}"}]}], ",", 
     RowBox[{"ProcDistrib", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{"2", ",", "1", ",", "2"}], "}"}]}], ",", 
     RowBox[{"NumberOfRefs", "\[Rule]", "0"}]}], "]"}]}], ";"}]}], "Input",
 CellChangeTimes->{
  3.3958229633269997`*^9, {3.395826012692*^9, 3.3958260170959997`*^9}, 
   3.395826502233*^9, {3.3958468811809998`*^9, 3.395846889237*^9}, 
   3.3958618729890003`*^9, {3.395901300766*^9, 3.395901301396*^9}, 
   3.3959991159609976`*^9, {3.3960005282909975`*^9, 3.3960005334929976`*^9}, {
   3.3960008018889976`*^9, 3.3960008029029975`*^9}, 3.3960373996242*^9, 
   3.40852401345*^9, 3.408524297481*^9, 3.408637541513*^9, {3.408637583424*^9,
    3.4086376192469997`*^9}, 3.408637941763*^9, {3.408637998343*^9, 
   3.408638081234*^9}, {3.409340444568*^9, 3.40934049973*^9}, {
   3.409340928177*^9, 3.409340928773*^9}, {3.409396188034148*^9, 
   3.409396205805148*^9}, {3.4094192542209997`*^9, 3.4094192547209997`*^9}, {
   3.4094988255179996`*^9, 3.40949882624*^9}, {3.4094989136470003`*^9, 
   3.409498925686*^9}, {3.409499182051*^9, 3.409499182633*^9}, {
   3.409499308882*^9, 3.409499309168*^9}, {3.409499480454*^9, 
   3.409499481684*^9}, 3.409499947123*^9, {3.4094999789119997`*^9, 
   3.409499979733*^9}, 3.409501928571*^9, {3.409516067861*^9, 
   3.4095160778129997`*^9}, {3.409516451354*^9, 3.409516451715*^9}, {
   3.409516703262*^9, 3.409516706584*^9}, 3.409516842224*^9, {
   3.409564756895*^9, 3.409564758946*^9}, 3.4095653486879997`*^9, {
   3.409596385125*^9, 3.409596385579*^9}, {3.409596475139*^9, 
   3.409596489875*^9}, {3.411195982716*^9, 3.411195987678*^9}, {
   3.411238203781*^9, 3.411238204297*^9}, {3.411238490307*^9, 
   3.411238557343*^9}, {3.41127866735*^9, 3.4112786803199997`*^9}, {
   3.4113749302939997`*^9, 3.411374931347*^9}, {3.411725758337*^9, 
   3.411725759532*^9}, {3.4117258087*^9, 3.411725850289*^9}, {
   3.411730728249*^9, 3.411730728709*^9}, {3.411817051016*^9, 
   3.411817054836*^9}, {3.411827883051*^9, 3.411827884745*^9}, {
   3.411828078499*^9, 3.411828079362*^9}, {3.4118704372790003`*^9, 
   3.411870438561*^9}, {3.41189355941*^9, 3.411893560683*^9}, {
   3.411893610547*^9, 3.4118936557860003`*^9}, {3.41189370754*^9, 
   3.411893730101*^9}, {3.411912742674*^9, 3.411912756288*^9}, {
   3.411919169024*^9, 3.411919169808*^9}, {3.4119202773529997`*^9, 
   3.411920278182*^9}, {3.412321449816*^9, 3.412321450729*^9}, {
   3.4123214935959997`*^9, 3.412321494237*^9}, {3.4123413208929996`*^9, 
   3.412341331156*^9}, {3.412343097836*^9, 3.412343099115*^9}, {
   3.4123432031210003`*^9, 3.412343203895*^9}, {3.412343249093*^9, 
   3.412343307701*^9}, {3.4123433389630003`*^9, 3.412343340267*^9}, {
   3.412357715349*^9, 3.4123577162320004`*^9}, {3.412357777869*^9, 
   3.4123577790950003`*^9}, {3.412357823365*^9, 3.41235782462*^9}, {
   3.414266331573*^9, 3.414266331718*^9}, {3.4143934630290003`*^9, 
   3.414393468436*^9}, {3.4143973650101748`*^9, 3.4143973655373325`*^9}, {
   3.414397406617653*^9, 3.4143974070467815`*^9}, {3.4143974671167974`*^9, 
   3.414397500789896*^9}, {3.415697718032499*^9, 3.415697730114707*^9}, {
   3.416155743726*^9, 3.416155763676*^9}, {3.416155915086*^9, 
   3.416155915844*^9}, {3.416156048495*^9, 3.416156049877*^9}, {
   3.4161561540369997`*^9, 3.4161561567279997`*^9}, {3.4162842748199997`*^9, 
   3.416284275553*^9}, {3.4162847007860003`*^9, 3.4162847012320004`*^9}, {
   3.4162852476280003`*^9, 3.416285248821*^9}, {3.416553813267*^9, 
   3.416553814083*^9}, {3.416553848141*^9, 3.4165538486870003`*^9}, {
   3.416554036659*^9, 3.4165540371870003`*^9}, {3.416580031611*^9, 
   3.416580041035*^9}, {3.41663740996*^9, 3.4166374256429996`*^9}, {
   3.416637597606*^9, 3.416637598262*^9}, {3.4166381453129997`*^9, 
   3.416638145711*^9}, {3.416638232667*^9, 3.416638233039*^9}, {
   3.416640127451*^9, 3.416640128369*^9}, {3.416736482223*^9, 
   3.4167364833199997`*^9}, {3.41676546635016*^9, 3.41676549741716*^9}, {
   3.4167655373741603`*^9, 3.4167655378351603`*^9}, {3.4167655989371605`*^9, 
   3.41676559960716*^9}, {3.41676563637916*^9, 3.41676563700116*^9}, {
   3.41676566922616*^9, 3.4167656718221602`*^9}, {3.41676572624716*^9, 
   3.41676572690316*^9}, {3.41676575938216*^9, 3.4167657600621605`*^9}, {
   3.41676581036916*^9, 3.41676581094116*^9}, {3.41676593008416*^9, 
   3.4167659305641603`*^9}, {3.4167659718121605`*^9, 3.41676597297616*^9}, {
   3.4168106911949997`*^9, 3.416810702428*^9}, {3.4168107760109997`*^9, 
   3.416810778035*^9}, {3.416810812355*^9, 3.416810841692*^9}, {
   3.41681087552*^9, 3.416810876994*^9}, {3.416810980635*^9, 
   3.416810993734*^9}, {3.416811066749*^9, 3.416811067576*^9}, {
   3.416811182256*^9, 3.416811183019*^9}, {3.416811241031*^9, 
   3.4168112418640003`*^9}, {3.4168114752390003`*^9, 3.416811476094*^9}, {
   3.416811642447*^9, 3.416811643802*^9}, {3.416812105566*^9, 
   3.4168121072130003`*^9}, {3.416813493632*^9, 3.416813502316*^9}, {
   3.416813537097*^9, 3.4168135380030003`*^9}, {3.416813576672*^9, 
   3.416813577413*^9}, {3.416813621566*^9, 3.41681362404*^9}, {
   3.4168138778059998`*^9, 3.416813881094*^9}, {3.416818273479*^9, 
   3.4168182749440002`*^9}, {3.416818365686*^9, 3.416818366318*^9}, {
   3.4168184082139997`*^9, 3.416818409023*^9}, {3.416818439241*^9, 
   3.416818466775*^9}, {3.416819856892*^9, 3.416819866748*^9}, {
   3.416819910514*^9, 3.4168199694820004`*^9}, {3.416822847197*^9, 
   3.416822854955*^9}, {3.4168228945360003`*^9, 3.416822895475*^9}, {
   3.416823569837*^9, 3.41682357052*^9}, {3.4168236290439997`*^9, 
   3.416823629729*^9}, {3.416823686347*^9, 3.416823687705*^9}, {
   3.4168237442939997`*^9, 3.416823745499*^9}, {3.416823991722*^9, 
   3.416823992675*^9}, {3.4168240302650003`*^9, 3.416824030535*^9}, {
   3.41682408305*^9, 3.416824085224*^9}, {3.416824180921*^9, 
   3.416824181651*^9}, {3.4168242341140003`*^9, 3.4168242347860003`*^9}, {
   3.416824319296*^9, 3.416824321217*^9}, {3.416824355943*^9, 
   3.416824386436*^9}, {3.416824442625*^9, 3.4168244491140003`*^9}, {
   3.41682463695*^9, 3.416824639415*^9}, {3.416893119307*^9, 
   3.416893120509*^9}, {3.416893248674*^9, 3.416893253026*^9}, {
   3.4171555927279997`*^9, 3.4171555996029997`*^9}, {3.41715683559*^9, 
   3.417156836789*^9}, {3.417156923547*^9, 3.417156925108*^9}, 
   3.41715821452*^9, {3.417158477416*^9, 3.417158490424*^9}, {
   3.417187883742*^9, 3.4171878917609997`*^9}, {3.417188251557*^9, 
   3.417188252566*^9}, {3.417188661119*^9, 3.4171886619519997`*^9}, {
   3.435903882301125*^9, 3.435903895301125*^9}, {3.435903925769875*^9, 
   3.43590392750425*^9}, {3.4359041205355*^9, 3.435904121223*^9}, {
   3.435904242973*^9, 3.435904243738625*^9}, {3.43591020325425*^9, 
   3.4359102159105*^9}, 3.43591079694175*^9, {3.435910913519875*^9, 
   3.435910915363625*^9}, 3.4359110579105*^9, {3.435911680973*^9, 
   3.4359116825355*^9}, {3.453572206299*^9, 3.45357220746*^9}, {
   3.454663809734375*^9, 3.454663823953125*^9}, {3.454663886859375*^9, 
   3.45466388825*^9}, {3.4546639991875*^9, 3.45466400509375*^9}, {
   3.459148615875*^9, 3.45914862271875*^9}, {3.4591486650625*^9, 
   3.459148676796875*^9}, {3.4876666908868866`*^9, 3.487666713662891*^9}, {
   3.4876737598566914`*^9, 3.487673795502698*^9}, {3.48767405610075*^9, 
   3.4876740567091503`*^9}, {3.488607686960375*^9, 3.488607687116625*^9}, {
   3.602067749161524*^9, 3.6020677600066905`*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"out", "=."}], ";", 
  RowBox[{"ReadBinarySnapFile", "[", 
   RowBox[{"\"\<velocity.snp\>\"", ",", "5", ",", "out", ",", 
    RowBox[{"PrintInfo", "\[Rule]", "None"}]}], "]"}], ";"}]], "Input",
 CellChangeTimes->{{3.435649212551125*^9, 3.43564922719175*^9}, {
  3.435649289332375*^9, 3.43564931231675*^9}}],

Cell[CellGroupData[{

Cell["\:0412\:044b\:0434\:0435\:043b\:0435\:043d\:0438\:0435 \:0432\:043d\
\:0443\:0442\:0440\:0435\:043d\:043d\:0435\:0439 \:043e\:0431\:043b\:0430\
\:0441\:0442\:0438", "Text",
 CellGroupingRules->{GroupTogetherGrouping, 10000.},
 CellChangeTimes->{{3.392109623901*^9, 3.202040031874125*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"GetInner", "[", 
   RowBox[{"ar_", "?", "ArrayQ"}], "]"}], ":=", 
  RowBox[{"Block", "[", 
   RowBox[{
    RowBox[{"{", "b", "}"}], ",", 
    RowBox[{"Switch", "[", 
     RowBox[{
      RowBox[{"Length", "[", 
       RowBox[{"Dimensions", "[", "ar", "]"}], "]"}], ",", "3", ",", 
      RowBox[{"Transpose", "[", 
       RowBox[{
        RowBox[{
         RowBox[{
          FractionBox[
           RowBox[{"node", "/.", 
            RowBox[{"b_", "\[RuleDelayed]", 
             RowBox[{"BitAnd", "[", 
              RowBox[{"b", ",", "8"}], "]"}]}]}], "8"], "#"}], "&"}], "/@", 
        RowBox[{"Transpose", "[", "ar", "]"}]}], "]"}], ",", "2", ",", 
      RowBox[{
       FractionBox[
        RowBox[{"node", "/.", 
         RowBox[{"b_", "\[RuleDelayed]", 
          RowBox[{"BitAnd", "[", 
           RowBox[{"b", ",", "8"}], "]"}]}]}], "8"], "ar"}], ",", "_", ",", 
      "$Failed"}], "]"}]}], "]"}]}]], "Input",
 CellGroupingRules->{GroupTogetherGrouping, 10000.},
 InitializationCell->True,
 CellChangeTimes->{{3.419769262608*^9, 3.419769293922*^9}, {
  3.4265550571877866`*^9, 3.4265550579287863`*^9}, {3.4265560798137865`*^9, 
  3.4265560801037865`*^9}, {3.4265568567807865`*^9, 3.4265568637687864`*^9}, {
  3.4265569337687864`*^9, 3.426557018967787*^9}, {3.4280849051549997`*^9, 
  3.428084912672*^9}, {3.4280849476940002`*^9, 3.4280849504890003`*^9}, {
  3.432286145515625*^9, 3.432286146359375*^9}, {3.437985038765625*^9, 
  3.43798509209375*^9}, {3.437985326796875*^9, 3.202040031874125*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"GetVacuum", "[", 
   RowBox[{"ar_", "?", "ArrayQ"}], "]"}], ":=", 
  RowBox[{"Block", "[", 
   RowBox[{
    RowBox[{"{", "b", "}"}], ",", 
    RowBox[{"Switch", "[", 
     RowBox[{
      RowBox[{"Length", "[", 
       RowBox[{"Dimensions", "[", "ar", "]"}], "]"}], ",", "3", ",", 
      RowBox[{"Transpose", "[", 
       RowBox[{
        RowBox[{
         RowBox[{
          RowBox[{"(", 
           RowBox[{"1", "-", 
            FractionBox[
             RowBox[{"node", "/.", 
              RowBox[{"b_", "\[RuleDelayed]", 
               RowBox[{"BitAnd", "[", 
                RowBox[{"b", ",", "8"}], "]"}]}]}], "8"]}], ")"}], "#"}], 
         "&"}], "/@", 
        RowBox[{"Transpose", "[", "ar", "]"}]}], "]"}], ",", "2", ",", 
      RowBox[{
       RowBox[{"(", 
        RowBox[{"1", "-", 
         FractionBox[
          RowBox[{"node", "/.", 
           RowBox[{"b_", "\[RuleDelayed]", 
            RowBox[{"BitAnd", "[", 
             RowBox[{"b", ",", "8"}], "]"}]}]}], "8"]}], ")"}], "ar"}], ",", 
      "_", ",", "$Failed"}], "]"}]}], "]"}]}]], "Input",
 CellGroupingRules->{GroupTogetherGrouping, 10000.},
 InitializationCell->True,
 CellChangeTimes->{{3.436525074859375*^9, 3.436525090609375*^9}, {
  3.43798509975*^9, 3.202040031874125*^9}}]
}, Closed]],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"{", 
    RowBox[{"vxs", ",", "vys", ",", "vzs", ",", "ps", ",", "nuts"}], "}"}], 
   "=", 
   RowBox[{"GetInner", "/@", 
    RowBox[{"{", 
     RowBox[{"vx", ",", "vy", ",", "vz", ",", "p", ",", "nut"}], "}"}]}]}], 
  ";"}]], "Input",
 CellChangeTimes->{{3.419769319309*^9, 3.419769321623*^9}}],

Cell[CellGroupData[{

Cell[BoxData["bounds"], "Input",
 CellChangeTimes->{{3.490679282328125*^9, 3.49067928296875*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"18.`", ",", "22.`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{"0.`", ",", "8.97598`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"-", "2.`"}], ",", "2.`"}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{3.49067928325*^9, 3.49068156690625*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"{", 
    RowBox[{"vx", ",", "vy", ",", "vz"}], "}"}], "=", 
   RowBox[{"Take", "[", 
    RowBox[{"out", ",", "3"}], "]"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.602062719197251*^9, 3.602062726264859*^9}}],

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"{", 
    RowBox[{"Bx", ",", "By", ",", "Bz"}], "}"}], "=", 
   RowBox[{"rotc", "[", 
    RowBox[{
     RowBox[{"Sequence", "@@", 
      RowBox[{"Take", "[", 
       RowBox[{"out", ",", 
        RowBox[{"{", 
         RowBox[{"4", ",", "6"}], "}"}]}], "]"}]}], ",", "3"}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"{", 
    RowBox[{"jx", ",", "jy", ",", "jz"}], "}"}], "=", 
   RowBox[{"rotc", "[", 
    RowBox[{"Bx", ",", "By", ",", "Bz", ",", "3"}], "]"}]}], ";"}]}], "Input",
 CellChangeTimes->{{3.396031269856*^9, 3.396031270641*^9}, {
   3.4094991425889997`*^9, 3.40949915275*^9}, {3.409499284632*^9, 
   3.409499289375*^9}, {3.4095964979370003`*^9, 3.409596498314*^9}, {
   3.453622858140625*^9, 3.453622859359375*^9}, {3.45914707121875*^9, 
   3.459147072609375*^9}, {3.45914734971875*^9, 3.45914735046875*^9}, {
   3.486887910091125*^9, 3.486887912997375*^9}, 3.490676139484375*^9, 
   3.490679289171875*^9, 3.49068043534375*^9, 3.490680499984375*^9, 
   3.49068158253125*^9, {3.49068163175*^9, 3.490681632921875*^9}, 
   3.490682198546875*^9, 3.490682913859375*^9, 3.490684687875*^9, {
   3.6020624831811256`*^9, 3.6020624835261307`*^9}, {3.6020626691414824`*^9, 
   3.6020626946868744`*^9}, {3.6020680769390583`*^9, 3.6020680784565816`*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell["\:041f\:0440\:043e\:0432\:0435\:0440\:043a\:0430 \:0441\:043e\:0432\
\:043f\:0430\:0434\:0435\:043d\:0438\:044f", "Subsubsection",
 CellChangeTimes->{{3.4591491170625*^9, 3.459149119171875*^9}}],

Cell[BoxData[{
 RowBox[{
  RowBox[{
   RowBox[{"{", 
    RowBox[{
    "p1", ",", "vx1", ",", "vy1", ",", "vz1", ",", "Axm1", ",", "Aym1", ",", 
     "Azm1", ",", "nutm1"}], "}"}], "=", 
   RowBox[{"{", 
    RowBox[{
    "p", ",", "vx", ",", "vy", ",", "vz", ",", "Axm", ",", "Aym", ",", "Azm", 
     ",", "nutm"}], "}"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"{", 
    RowBox[{
    "p1", ",", "vx1", ",", "vy1", ",", "vz1", ",", "Ax1", ",", "Ay1", ",", 
     "Az1", ",", "nut1"}], "}"}], "=", 
   RowBox[{"{", 
    RowBox[{
    "p", ",", "vx", ",", "vy", ",", "vz", ",", "Ax", ",", "Ay", ",", "Az", 
     ",", "nut"}], "}"}]}], ";"}]}], "Input"],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"{", 
    RowBox[{
    "p1", ",", "vx1", ",", "vy1", ",", "vz1", ",", "Ax1", ",", "Ay1", ",", 
     "Az1", ",", "nut1"}], "}"}], "=", "out"}], ";"}]], "Input",
 CellChangeTimes->{{3.4095653445699997`*^9, 3.409565345447*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"{", 
    RowBox[{
    "p2", ",", "vx2", ",", "vy2", ",", "vz2", ",", "Ax2", ",", "Ay2", ",", 
     "Az2", ",", "nut2"}], "}"}], "=", "out"}], ";"}]], "Input",
 CellChangeTimes->{{3.4095653595690002`*^9, 3.40956536877*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Max", "/@", 
  RowBox[{"Abs", "[", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{
     "p1", ",", "vx1", ",", "vy1", ",", "vz1", ",", "Ax1", ",", "Ay1", ",", 
      "Az1", ",", "nut1"}], "}"}], "-", 
    RowBox[{"{", 
     RowBox[{
     "p2", ",", "vx2", ",", "vy2", ",", "vz2", ",", "Ax2", ",", "Ay2", ",", 
      "Az2", ",", "nut2"}], "}"}]}], "]"}]}]], "Input",
 CellChangeTimes->{{3.409565370896*^9, 3.4095653871*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "1.`", ",", "1.5`", ",", "1.`", ",", "1.899999976158142`", ",", 
   "1.0319336913526058`", ",", "1.011904988437891`", ",", 
   "1.0319351591169834`", ",", "1.`"}], "}"}]], "Output",
 CellChangeTimes->{3.409565388469*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"out1", "=", "out"}], ";"}]], "Input",
 CellChangeTimes->{{3.417158210068*^9, 3.417158211492*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"{", 
    RowBox[{
    "p2", ",", "vx2", ",", "vy2", ",", "vz2", ",", "Ax2", ",", "Ay2", ",", 
     "Az2", ",", "nut2", ",", "Axm2", ",", "Aym2", ",", "Azm2", ",", 
     "nutm2"}], "}"}], "=", 
   RowBox[{"{", 
    RowBox[{
    "p", ",", "vx", ",", "vy", ",", "vz", ",", "Ax", ",", "Ay", ",", "Az", 
     ",", "nut", ",", "Axm", ",", "Aym", ",", "Azm", ",", "nutm"}], "}"}]}], 
  ";"}]], "Input"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"Max", "[", 
    RowBox[{"Abs", "[", "#", "]"}], "]"}], "&"}], "/@", 
  RowBox[{"(", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{
     "p2", ",", "vx2", ",", "vy2", ",", "vz2", ",", "Ax2", ",", "Ay2", ",", 
      "Az2", ",", "nut2", ",", "Axm2", ",", "Aym2", ",", "Azm2", ",", 
      "nutm2"}], "}"}], "-", 
    RowBox[{"{", 
     RowBox[{
     "p1", ",", "vx1", ",", "vy1", ",", "vz1", ",", "Ax1", ",", "Ay1", ",", 
      "Az1", ",", "nut1", ",", "Axm1", ",", "Aym1", ",", "Azm1", ",", 
      "nutm1"}], "}"}]}], ")"}]}]], "Input"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", 
   "0.`", ",", "0", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`"}], 
  "}"}]], "Output"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"(", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
    "p2", ",", "vx2", ",", "vy2", ",", "vz2", ",", "Ax2", ",", "Ay2", ",", 
     "Az2", ",", "nut2", ",", "Axm2", ",", "Aym2", ",", "Azm2", ",", 
     "nutm2"}], "}"}], "==", 
   RowBox[{"{", 
    RowBox[{
    "p1", ",", "vx1", ",", "vy1", ",", "vz1", ",", "Ax1", ",", "Ay1", ",", 
     "Az1", ",", "nut1", ",", "Axm1", ",", "Aym1", ",", "Azm1", ",", 
     "nutm1"}], "}"}]}], ")"}]], "Input"],

Cell[BoxData["True"], "Output"]
}, Open  ]],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
   RowBox[{
    RowBox[{"Brfi", "[", 
     RowBox[{"r1_", ",", "fi1_", ",", "z1_"}], "]"}], "=", 
    RowBox[{"ReplaceAll", "[", 
     RowBox[{
      RowBox[{
       RowBox[{
        FractionBox["1", "r"], 
        RowBox[{
         SubscriptBox["\[PartialD]", "fi"], 
         RowBox[{"Azi", "[", 
          RowBox[{"r", ",", "fi", ",", "z"}], "]"}]}]}], "-", 
       RowBox[{
        SubscriptBox["\[PartialD]", "z"], 
        RowBox[{"Ayi", "[", 
         RowBox[{"r", ",", "fi", ",", "z"}], "]"}]}]}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"r", "\[Rule]", "r1"}], ",", 
        RowBox[{"fi", "\[Rule]", "fi1"}], ",", 
        RowBox[{"z", "\[Rule]", "z1"}]}], "}"}]}], "]"}]}], ";", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"B\[Phi]fi", "[", 
     RowBox[{"r1_", ",", "fi1_", ",", "z1_"}], "]"}], "=", 
    RowBox[{"ReplaceAll", "[", 
     RowBox[{
      RowBox[{
       RowBox[{
        SubscriptBox["\[PartialD]", "z"], 
        RowBox[{"Axi", "[", 
         RowBox[{"r", ",", "fi", ",", "z"}], "]"}]}], "-", 
       RowBox[{
        SubscriptBox["\[PartialD]", "r"], 
        RowBox[{"Azi", "[", 
         RowBox[{"r", ",", "fi", ",", "z"}], "]"}]}]}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"r", "\[Rule]", "r1"}], ",", 
        RowBox[{"fi", "\[Rule]", "fi1"}], ",", 
        RowBox[{"z", "\[Rule]", "z1"}]}], "}"}]}], "]"}]}], ";", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Bzfi", "[", 
     RowBox[{"r1_", ",", "fi1_", ",", "z1_"}], "]"}], "=", 
    RowBox[{"ReplaceAll", "[", 
     RowBox[{
      RowBox[{
       RowBox[{
        SubscriptBox["\[PartialD]", "r"], 
        RowBox[{"Ayi", "[", 
         RowBox[{"r", ",", "fi", ",", "z"}], "]"}]}], "-", 
       RowBox[{
        FractionBox["1", "r"], 
        RowBox[{
         SubscriptBox["\[PartialD]", "fi"], 
         RowBox[{"Axi", "[", 
          RowBox[{"r", ",", "fi", ",", "z"}], "]"}]}]}], "+", 
       RowBox[{
        FractionBox["1", "r"], 
        RowBox[{"Ayi", "[", 
         RowBox[{"r", ",", "fi", ",", "z"}], "]"}]}]}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"r", "\[Rule]", "r1"}], ",", 
        RowBox[{"fi", "\[Rule]", "fi1"}], ",", 
        RowBox[{"z", "\[Rule]", "z1"}]}], "}"}]}], "]"}]}], ";", 
   "\[IndentingNewLine]", 
   RowBox[{
    RowBox[{"Bzfi", "[", 
     RowBox[{"r1_", ",", "fi1_", ",", "z1_"}], "]"}], "=", 
    RowBox[{"ReplaceAll", "[", 
     RowBox[{
      RowBox[{
       RowBox[{
        FractionBox["1", "r"], 
        RowBox[{
         SubscriptBox["\[PartialD]", "r"], 
         RowBox[{"(", 
          RowBox[{"r", " ", 
           RowBox[{"Ayi", "[", 
            RowBox[{"r", ",", "fi", ",", "z"}], "]"}]}], ")"}]}]}], "-", 
       RowBox[{
        FractionBox["1", "r"], 
        RowBox[{
         SubscriptBox["\[PartialD]", "fi"], 
         RowBox[{"Axi", "[", 
          RowBox[{"r", ",", "fi", ",", "z"}], "]"}]}]}]}], ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"r", "\[Rule]", "r1"}], ",", 
        RowBox[{"fi", "\[Rule]", "fi1"}], ",", 
        RowBox[{"z", "\[Rule]", "z1"}]}], "}"}]}], "]"}]}], ";"}], 
  "*)"}]], "Input"]
}, Closed]],

Cell[CellGroupData[{

Cell["\:0412\:0435\:043b\:0438\:0447\:0438\:043d\:044b", "Subsubsection",
 CellChangeTimes->{{3.45914902509375*^9, 3.459149026046875*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"EstimateBoundary", "[", 
   RowBox[{"mat_", "?", "ArrayQ"}], "]"}], ":=", 
  RowBox[{"Block", "[", 
   RowBox[{
    RowBox[{"{", 
     RowBox[{"Ein", ",", "Eb", ",", 
      RowBox[{"ds", "=", 
       RowBox[{"Dimensions", "[", "mat", "]"}]}]}], "}"}], ",", 
    "\[IndentingNewLine]", 
    RowBox[{"(*", 
     RowBox[{
      RowBox[{"Ein", "=", 
       RowBox[{"Mean", "[", 
        RowBox[{"Flatten", "@", 
         SuperscriptBox[
          RowBox[{"mat", "\[LeftDoubleBracket]", 
           RowBox[{
            RowBox[{"2", ";;", 
             RowBox[{"-", "2"}]}], ",", "All", ",", 
            RowBox[{"2", ";;", 
             RowBox[{"-", "2"}]}]}], "\[RightDoubleBracket]"}], "2"]}], 
        "]"}]}], ";", "\[IndentingNewLine]", 
      RowBox[{"Eb", "=", 
       SqrtBox[
        FractionBox[
         RowBox[{
          RowBox[{
           RowBox[{"(", 
            RowBox[{"Times", "@@", "ds"}], ")"}], " ", 
           RowBox[{"Mean", "[", 
            RowBox[{"Flatten", "@", 
             SuperscriptBox["mat", "2"]}], "]"}]}], "-", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{"Times", "@@", 
             RowBox[{"(", 
              RowBox[{"ds", "-", "2"}], ")"}]}], ")"}], "Ein"}]}], 
         RowBox[{
          RowBox[{"(", 
           RowBox[{"Times", "@@", "ds"}], ")"}], "-", 
          RowBox[{"(", 
           RowBox[{"Times", "@@", 
            RowBox[{"(", 
             RowBox[{"ds", "-", "2"}], ")"}]}], ")"}]}]]]}], ";", 
      "\[IndentingNewLine]", 
      FractionBox["Eb", 
       RowBox[{"Max", "[", 
        RowBox[{"Flatten", "@", 
         RowBox[{"Abs", "@", "mat"}]}], "]"}]]}], "*)"}], 
    "\[IndentingNewLine]", 
    FractionBox[
     RowBox[{"Max", "@", 
      RowBox[{"Abs", "@", 
       RowBox[{"Flatten", "@", 
        RowBox[{"mat", "\[LeftDoubleBracket]", 
         RowBox[{
          RowBox[{"2", ";;", 
           RowBox[{"-", "2"}]}], ",", "All", ",", 
          RowBox[{"2", ";;", 
           RowBox[{"-", "2"}]}]}], "\[RightDoubleBracket]"}]}]}]}], 
     RowBox[{"Max", "@", 
      RowBox[{"Abs", "@", 
       RowBox[{"Complement", "[", 
        RowBox[{
         RowBox[{"Flatten", "@", "mat"}], ",", 
         RowBox[{"Flatten", "@", 
          RowBox[{"mat", "\[LeftDoubleBracket]", 
           RowBox[{
            RowBox[{"2", ";;", 
             RowBox[{"-", "2"}]}], ",", "All", ",", 
            RowBox[{"2", ";;", 
             RowBox[{"-", "2"}]}]}], "\[RightDoubleBracket]"}]}]}], 
        "]"}]}]}]]}], "\[IndentingNewLine]", "]"}]}]], "Input",
 CellChangeTimes->{{3.418313215024*^9, 3.418313230348*^9}, {
  3.4183133050039997`*^9, 3.41831353444*^9}, {3.41831371574*^9, 
  3.418313726586*^9}, {3.418321648123*^9, 3.418321772046*^9}, {
  3.4183218139779997`*^9, 3.4183218159630003`*^9}, {3.418321854078*^9, 
  3.418321859171*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"Max", "[", 
    RowBox[{"Abs", "[", 
     RowBox[{"Flatten", "[", "#", "]"}], "]"}], "]"}], "&"}], "/@", 
  RowBox[{"(", 
   RowBox[{"out1", "-", "out"}], ")"}]}]], "Input",
 CellChangeTimes->{{3.417158219649*^9, 3.417158269566*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", "0.`", ",", 
   "0.`", ",", "0.`"}], "}"}]], "Output",
 CellChangeTimes->{{3.4171582246400003`*^9, 3.417158270184*^9}, 
   3.417158486698*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Max", "@", 
  RowBox[{"Abs", "@", 
   SqrtBox[
    RowBox[{"Total", "[", 
     SuperscriptBox[
      RowBox[{"Take", "[", 
       RowBox[{"out", ",", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"2", ",", "4"}], "}"}], "-", "1"}]}], "]"}], "2"], 
     "]"}]]}]}]], "Input",
 CellChangeTimes->{{3.41241999889124*^9, 3.4124200186492157`*^9}, {
  3.4876679845327435`*^9, 3.487667986326744*^9}, {3.602069201350834*^9, 
  3.602069201458335*^9}}],

Cell[BoxData["0.9973258861673077`"], "Output",
 CellChangeTimes->{3.487667987231544*^9, 3.6020692020083437`*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"Total", "[", 
    RowBox[{"Flatten", "[", 
     SuperscriptBox["#", "2"], "]"}], "]"}], "&"}], "/@", "out"}]], "Input",
 CellChangeTimes->{{3.41715688917*^9, 3.417156901984*^9}, {
  3.435556427613625*^9, 3.43555643719175*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Max", "/@", 
  RowBox[{"Abs", "@", "out"}]}]], "Input",
 CellChangeTimes->{{3.412499080718*^9, 3.412499089615*^9}, {
  3.4124991686879997`*^9, 3.412499172567*^9}, {3.4142662323780003`*^9, 
  3.4142662325629997`*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "0.03359052166342735`", ",", "0.9967598915100098`", ",", 
   "0.016382530331611633`", ",", "2.3125`", ",", "0.`", ",", 
   "0.02535397559404373`"}], "}"}]], "Output",
 CellChangeTimes->{3.459148247390625*^9, 3.459148688015625*^9, 
  3.459161481484375*^9, 3.45916166428125*^9, 3.45916248571875*^9, 
  3.4876679413675346`*^9, 3.4879496303071117`*^9, 3.6020625916327915`*^9, 
  3.6020677979872737`*^9, 3.6020686226044445`*^9, 3.602069190408166*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Max", "/@", 
  RowBox[{"Abs", "@", 
   RowBox[{"{", 
    RowBox[{"Bx", ",", "By", ",", "Bz"}], "}"}]}]}]], "Input",
 CellChangeTimes->{{3.6020625948703413`*^9, 3.602062602142953*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "3.6608647148200215`*^-17", ",", "1.456828339894607`", ",", 
   "8.700523295021635`*^-15"}], "}"}]], "Output",
 CellChangeTimes->{
  3.6020626027604623`*^9, 3.6020626745165644`*^9, 3.602067795214731*^9, 
   3.6020680820241365`*^9, 3.6020686235994596`*^9, {3.602069191070676*^9, 
   3.602069206680916*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 SqrtBox[
  RowBox[{"Mean", "/@", 
   RowBox[{"Flatten", "/@", 
    SuperscriptBox[
     RowBox[{"{", 
      RowBox[{"Bx", ",", "By", ",", "Bz"}], "}"}], "2"]}]}]]], "Input",
 CellChangeTimes->{{3.4536232884375*^9, 3.453623290953125*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "1.2114415250358072`*^10", ",", "4.392101247600714`*^10", ",", 
   "1.3736538479794607`*^10"}], "}"}]], "Output",
 CellChangeTimes->{3.453623295390625*^9, 3.459149165609375*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Mean", "/@", 
  RowBox[{"Flatten", "/@", 
   RowBox[{"{", 
    RowBox[{"Bx", ",", "By", ",", "Bz"}], "}"}]}]}]], "Input",
 CellChangeTimes->{{3.4536232405625*^9, 3.45362325365625*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"-", "2.040683003323362`*^8"}], ",", "5.599082527280046`", ",", 
   RowBox[{"-", "5.767526695967946`*^8"}]}], "}"}]], "Output",
 CellChangeTimes->{{3.4536232456875*^9, 3.45362325453125*^9}, 
   3.45473813771875*^9, 3.454738227203125*^9, 3.45914916640625*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 FractionBox[
  SqrtBox[
   RowBox[{"Mean", "/@", 
    RowBox[{"Flatten", "/@", 
     SuperscriptBox[
      RowBox[{"{", 
       RowBox[{"Bx", ",", "By", ",", "Bz"}], "}"}], "2"]}]}]], 
  RowBox[{"Mean", "/@", 
   RowBox[{"Flatten", "/@", 
    RowBox[{"{", 
     RowBox[{"Bx", ",", "By", ",", "Bz"}], "}"}]}]}]]], "Input",
 CellChangeTimes->{{3.45362331446875*^9, 3.453623317609375*^9}, {
  3.45473825646875*^9, 3.4547382611875*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"-", "59.36451291371122`"}], ",", "7.844323112226627`*^9", ",", 
   RowBox[{"-", "23.817034933531843`"}]}], "}"}]], "Output",
 CellChangeTimes->{
  3.453623318453125*^9, {3.45473821546875*^9, 3.454738227609375*^9}, 
   3.45473826153125*^9, 3.459149167046875*^9}]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell[TextData[{
 "\:041f\:0440\:043e\:0441\:0442\:044b\:0435 ",
 Cell[BoxData[
  FormBox["\:0433\:0440\:0430\:0444\:0438\:043a\:0438", TraditionalForm]],
  FormatType->"TraditionalForm"]
}], "Subsubsection",
 CellChangeTimes->{{3.459149152015625*^9, 3.459149153890625*^9}, {
  3.6020624882862043`*^9, 3.6020624894337215`*^9}}],

Cell[BoxData[
 RowBox[{"Show2x", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"ListPlot3D", "[", 
     RowBox[{
      RowBox[{"Transpose", "[", 
       RowBox[{"Cut3D", "[", 
        RowBox[{"#", ",", "2", ",", "4"}], "]"}], "]"}], ",", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
      RowBox[{"DisplayFunction", "->", "Identity"}]}], "]"}], "&"}], ",", 
   "\[IndentingNewLine]", 
   RowBox[{"Take", "[", 
    RowBox[{"out", ",", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"4", ",", "7"}], "}"}], "-", "3"}]}], "]"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.409499330325*^9, 3.409499338832*^9}, {
   3.4095965087869997`*^9, 3.4095965163050003`*^9}, 3.417405351799*^9, {
   3.417405586032*^9, 3.417405587862*^9}, {3.4355210578059998`*^9, 
   3.435521058755*^9}, {3.435559668707375*^9, 3.435559671519875*^9}, {
   3.435648495473*^9, 3.435648496519875*^9}, 3.435648706676125*^9, 
   3.435663985426125*^9, 3.435901365832375*^9, 3.43591030181675*^9, 
   3.4535722149370003`*^9, {3.454401756203125*^9, 3.202039963686625*^9}, {
   3.454664093171875*^9, 3.454664106546875*^9}, {3.45466529546875*^9, 
   3.4546653033125*^9}, {3.4876680157639494`*^9, 3.487668033345153*^9}, {
   3.48766806888196*^9, 3.487668149393576*^9}, {3.4876777155650773`*^9, 
   3.4876777248782787`*^9}, {3.602062501511407*^9, 3.602062516324135*^9}, {
   3.602062619868225*^9, 3.602062635935972*^9}, {3.6020678023348403`*^9, 
   3.602067802549844*^9}}],

Cell[BoxData[
 RowBox[{"Show2x", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"ListPlot3D", "[", 
     RowBox[{
      RowBox[{"Transpose", "[", 
       RowBox[{"GetVacuum", "[", 
        RowBox[{"Cut3D", "[", 
         RowBox[{"#", ",", "2", ",", "7"}], "]"}], "]"}], "]"}], ",", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
      RowBox[{"DisplayFunction", "->", "Identity"}]}], "]"}], "&"}], ",", 
   RowBox[{"{", 
    RowBox[{"vx", ",", "vy", ",", "vz", ",", "p"}], "}"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.4544025635625*^9, 3.202039893217875*^9}}],

Cell[BoxData[
 RowBox[{"Show2x", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"ListPlot3D", "[", 
     RowBox[{
      RowBox[{"Transpose", "[", 
       RowBox[{"Cut3D", "[", 
        RowBox[{"#", ",", "3", ",", "19"}], "]"}], "]"}], ",", 
      RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
      RowBox[{"DisplayFunction", "->", "Identity"}]}], "]"}], "&"}], ",", 
   RowBox[{"{", 
    RowBox[{"Bx", ",", "By", ",", "Bz", ",", 
     RowBox[{"out", "[", 
      RowBox[{"[", "1", "]"}], "]"}]}], "}"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.417496575058*^9, 3.417496606704*^9}, {3.418312254539*^9,
   3.418312254818*^9}, {3.487677694692273*^9, 3.4876776964706736`*^9}, {
  3.4876777379354815`*^9, 3.487677740010282*^9}, {3.6020628914898973`*^9, 
  3.602062897009982*^9}}],

Cell[BoxData[
 RowBox[{"Table", "[", 
  RowBox[{
   RowBox[{"ListPlot3D", "[", 
    RowBox[{
     RowBox[{"Transpose", "[", 
      RowBox[{"Cut3D", "[", 
       RowBox[{"Bz", ",", "2", ",", "i"}], "]"}], "]"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
     RowBox[{"DisplayFunction", "->", "Identity"}]}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{"i", ",", "36"}], "}"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.4184441624849997`*^9, 3.4184441952*^9}}],

Cell[BoxData[
 RowBox[{"ListPlot3D", "[", 
  RowBox[{
   RowBox[{"Transpose", "[", 
    RowBox[{"Cut3D", "[", 
     RowBox[{
      RowBox[{"out", "\[LeftDoubleBracket]", "5", "\[RightDoubleBracket]"}], 
      ",", "2", ",", "7"}], "]"}], "]"}], ",", 
   RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
   RowBox[{"DisplayFunction", "->", "Identity"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.417409016709*^9, 3.417409051373*^9}}],

Cell[BoxData[
 RowBox[{"PrintRange", "[", 
  RowBox[{"out", "\[LeftDoubleBracket]", 
   RowBox[{"2", ",", "23", ",", "All", ",", "23"}], "\[RightDoubleBracket]"}],
   "]"}]], "Input",
 CellChangeTimes->{{3.412419850224375*^9, 3.412419880957448*^9}, {
  3.435649905551125*^9, 3.435649998988625*^9}, {3.435650062488625*^9, 
  3.435650085738625*^9}, {3.43565068194175*^9, 3.435650684551125*^9}}],

Cell[BoxData[
 RowBox[{"Show2x", "[", 
  RowBox[{
   RowBox[{
    RowBox[{"ListPlot3D", "[", 
     RowBox[{
      RowBox[{"Cut3D", "[", 
       RowBox[{"#", ",", "2", ",", "4"}], "]"}], ",", 
      RowBox[{"DisplayFunction", "\[Rule]", "Identity"}], ",", 
      RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], "&"}], ",", 
   RowBox[{"{", 
    RowBox[{"Bx", ",", "By", ",", "Bz", ",", 
     RowBox[{"Last", "[", "out", "]"}]}], "}"}]}], "]"}]], "Input",
 CellChangeTimes->{
  3.3958265119449997`*^9, {3.395999171864998*^9, 3.3959991738109975`*^9}, {
   3.4085240472539997`*^9, 3.408524047384*^9}, {3.409499348512*^9, 
   3.409499360927*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"(*", 
   RowBox[{
    RowBox[{"Show4", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"ListPlot3D", "[", 
        RowBox[{
         RowBox[{"Transpose", "[", 
          RowBox[{"Cut3D", "[", "#", "]"}], "]"}], ",", 
         RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
         RowBox[{"DisplayFunction", "\[Rule]", "Identity"}]}], "]"}], "&"}], 
      ",", 
      RowBox[{"{", 
       RowBox[{"vx", ",", "vy", ",", "vz", ",", 
        SqrtBox[
         RowBox[{
          SuperscriptBox["vx", "2"], "+", 
          SuperscriptBox["vy", "2"], "+", 
          SuperscriptBox["vz", "2"]}]]}], "}"}]}], "]"}], ";"}], "*)"}], "\n", 
  RowBox[{
   RowBox[{"Show2x", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"ListPlot3D", "[", 
       RowBox[{
        RowBox[{"Transpose", "[", 
         RowBox[{"Cut3D", "[", "#", "]"}], "]"}], ",", 
        RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
        RowBox[{"DisplayFunction", "\[Rule]", "Identity"}], ",", 
        RowBox[{"Mesh", "\[Rule]", "False"}]}], "]"}], "&"}], ",", 
     RowBox[{"{", 
      RowBox[{"Ax", ",", "Ay", ",", "Az", ",", "nut"}], "}"}]}], "]"}], 
   "\[IndentingNewLine]", 
   RowBox[{"Show2x", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"ListPlot3D", "[", 
       RowBox[{
        RowBox[{"Transpose", "[", 
         RowBox[{"Cut3D", "[", 
          RowBox[{"WithoutFict", "[", "#", "]"}], "]"}], "]"}], ",", 
        RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
        RowBox[{"DisplayFunction", "\[Rule]", "Identity"}], ",", 
        RowBox[{"Mesh", "\[Rule]", "False"}]}], "]"}], "&"}], ",", 
     RowBox[{"{", 
      RowBox[{"Bx", ",", "By", ",", "Bz", ",", 
       SqrtBox[
        RowBox[{
         SuperscriptBox["Bx", "2"], "+", 
         SuperscriptBox["By", "2"], "+", 
         SuperscriptBox["Bz", "2"]}]]}], "}"}]}], "]"}], 
   "\[IndentingNewLine]", 
   RowBox[{"Show2x", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"ListPlot3D", "[", 
       RowBox[{
        RowBox[{"Transpose", "[", 
         RowBox[{"Cut3D", "[", 
          RowBox[{"WithoutFict", "[", "#", "]"}], "]"}], "]"}], ",", 
        RowBox[{"PlotRange", "\[Rule]", "All"}], ",", 
        RowBox[{"DisplayFunction", "\[Rule]", "Identity"}], ",", 
        RowBox[{"Mesh", "\[Rule]", "False"}]}], "]"}], "&"}], ",", 
     RowBox[{"{", 
      RowBox[{"jx", ",", "jy", ",", "jz", ",", 
       SqrtBox[
        RowBox[{
         SuperscriptBox["jx", "2"], "+", 
         SuperscriptBox["jy", "2"], "+", 
         SuperscriptBox["jz", "2"]}]]}], "}"}]}], "]"}]}]}]], "Input",
 CellChangeTimes->{{3.39582776821*^9, 3.3958277796610003`*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"dist", "=", "15"}], ";", 
  RowBox[{"PrintRange", "[", 
   RowBox[{"Cut3D", "[", 
    RowBox[{
     RowBox[{"Cut3D", "[", 
      RowBox[{"Bx", ",", "3", ",", "dist"}], "]"}], ",", "1", ",", "dist"}], 
    "]"}], "]"}]}]], "Input",
 CellChangeTimes->{3.39603051309*^9}],

Cell[BoxData[
 RowBox[{"(*", 
  RowBox[{
   RowBox[{"ListPlot3D", "[", 
    RowBox[{"Transpose", "[", 
     RowBox[{"Cut3D", "[", 
      RowBox[{
       FractionBox["Ay", 
        RowBox[{
        "coor", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}]], "-", 
       FractionBox[
        RowBox[{"PD", "[", 
         RowBox[{"Ax", ",", "ghost", ",", 
          RowBox[{
          "dx", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], ",", 
          "2"}], "]"}], 
        RowBox[{
        "coor", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}]]}], 
      "]"}], "]"}], "]"}], ";", "\[IndentingNewLine]", 
   RowBox[{"ListPlot3D", "[", 
    RowBox[{"Transpose", "[", 
     RowBox[{"Cut3D", "[", 
      RowBox[{"PD", "[", 
       RowBox[{"Ay", ",", "ghost", ",", 
        RowBox[{"dx", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], 
        ",", "1"}], "]"}], "]"}], "]"}], "]"}], ";"}], "*)"}]], "Input"]
}, Closed]],

Cell[CellGroupData[{

Cell["\:0418\:043d\:0442\:0435\:0440\:043f\:043e\:043b\:0438\:0440\:043e\:0432\
\:0430\:043d\:043d\:044b\:0435 \:0433\:0440\:0430\:0444\:0438\:043a\:0438", \
"Subsubsection",
 CellChangeTimes->{{3.4591492455*^9, 3.459149248578125*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"{", 
    RowBox[{
    "vxi", ",", "vyi", ",", "vzi", ",", "Bxi", ",", "Byi", ",", "Bzi", ",", 
     "jxi", ",", "jyi", ",", "jzi"}], "}"}], "=", 
   RowBox[{
    RowBox[{
     RowBox[{"ListInterpolation", "[", 
      RowBox[{"#", ",", 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{
           RowBox[{"Min", "[", 
            RowBox[{
            "coor", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], 
            "]"}], ",", 
           RowBox[{"Max", "[", 
            RowBox[{
            "coor", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], 
            "]"}]}], "}"}], ",", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"Min", "[", 
            RowBox[{
            "coor", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], 
            "]"}], ",", 
           RowBox[{"Max", "[", 
            RowBox[{
            "coor", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}], 
            "]"}]}], "}"}], ",", 
         RowBox[{"{", 
          RowBox[{
           RowBox[{"Min", "[", 
            RowBox[{
            "coor", "\[LeftDoubleBracket]", "3", "\[RightDoubleBracket]"}], 
            "]"}], ",", 
           RowBox[{"Max", "[", 
            RowBox[{
            "coor", "\[LeftDoubleBracket]", "3", "\[RightDoubleBracket]"}], 
            "]"}]}], "}"}]}], "}"}], ",", 
       StyleBox[
        RowBox[{"InterpolationOrder", "->", "1"}], "MR"]}], "]"}], "&"}], "/@", 
    RowBox[{"{", 
     RowBox[{
     "vx", ",", "vy", ",", "vz", ",", "Bx", ",", "By", ",", "Bz", ",", "jx", 
      ",", "jy", ",", "jz"}], "}"}]}]}], ";"}]], "Input",
 CellChangeTimes->{{3.602062689279291*^9, 3.602062704302022*^9}, {
  3.6020627464101686`*^9, 3.602062747937692*^9}}],

Cell[BoxData[
 RowBox[{"Show", "[", 
  RowBox[{
   RowBox[{"GraphicsRow", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"SectionRZ", "[", 
        RowBox[{"vxi", ",", "vyi", ",", "vzi", ",", 
         RowBox[{"0.2`", " ", "\[Pi]"}]}], "]"}], ",", 
       RowBox[{"SectionR\[CapitalPhi]", "[", 
        RowBox[{"vxi", ",", "vyi", ",", "vzi", ",", 
         RowBox[{"Mean", "[", 
          RowBox[{
          "bounds", "\[LeftDoubleBracket]", "3", "\[RightDoubleBracket]"}], 
          "]"}], ",", 
         RowBox[{"AspectRatio", "\[Rule]", "Automatic"}]}], "]"}], ",", 
       RowBox[{"Section\[CapitalPhi]Z", "[", 
        RowBox[{"vxi", ",", "vyi", ",", "vzi", ",", 
         RowBox[{"Mean", "[", 
          RowBox[{
          "bounds", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], 
          "]"}], ",", 
         RowBox[{"AspectRatio", "\[Rule]", "Automatic"}]}], "]"}]}], "}"}], 
     ",", 
     RowBox[{"Spacings", "\[Rule]", 
      RowBox[{"Scaled", "[", "0.`", "]"}]}]}], "]"}], ",", 
   RowBox[{"AspectRatio", "\[Rule]", "1"}]}], "]"}]], "Input",
 CellChangeTimes->{
  3.395861967439*^9, {3.395862029435*^9, 3.395862032208*^9}, {
   3.396025151302*^9, 3.3960251631470003`*^9}, {3.396025214866*^9, 
   3.396025268479*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"SectionRZ", "[", 
  RowBox[{"Bxi", ",", "Byi", ",", "Bzi", ",", 
   RowBox[{"0.2`", " ", "\[Pi]"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.6020691468824973`*^9, 3.6020691495075374`*^9}}],

Cell[BoxData[
 GraphicsBox[{InsetBox[
    GraphicsBox[{GraphicsComplexBox[CompressedData["
1:eJxsnQWUlsX3x5cNttjepVG6pJGOeQQE6ZASEQRpSUEERJDuEJCSFFAaCUEk
niWlu7ukpGHzrf/+9nk/85yZ/e/hHM733Hln7p2+37kzT77O/Vp09fXx8Tmc
38fnf/+3bvW/vwThY/3FD1vyaOiSRykSp8Ohbok7ZR+f9i+TAX5b/XTaPz+J
x6UnyCxxtv8l7xQk8Zq1//sLkbja/37+NovEJ9MzjJC4TJYDaf8iJR6arlCU
xPvTE8RIHPq/5GViJbbsi9Nwgrixvc/17X0cJvaCsReMvWDsBWMvGHvB2AvG
XjD2grEXjL1g7AVjLxh7VZwg/vofvJ4o7QVjLxh7wdgLxl4w9oKxF4y9YOwF
Yy8Ye8HYC8ZeMPaqOEHMKVh/VsH6b6S9YOwFYy8Ye8HYC8ZeMPaCsReMvWDs
BWMvGHvB2AvGXhUniNvp7f2ftBeMvWDsBWMvGHvB2AvGXjD2grEXjL1g7AVj
Lxh7wdir4gQxN93+e9JeMPaCsReMvWDsBWMvGHvB2AvGXjD2grEXjL1g7AVj
r4oTxMJ0fE7aC8ZeMPaCsReMvWDsBWMvGHvB2AvGXjD2grEXjL1g7FUx61H8
bnU9it+trkfxu9X1KH63uh7F71bXo/jd6noUv1tdj+J3q+tR/G51PYrfra5H
8bvV9Sh+t7oexe9W16P43ep6BE4Qky37BfaCsReMvWDsBWMvGHvB2AvGXjD2
grEXjL1g7AVjLxh7VZwgplv9W9oLxl4w9oKxF4y9YOwFYy8Ye8HYC8ZeMPaC
sReMvWDsVXGCuGzNX9JeMPaCsReMvWDsBWMvGHvB2AvGXjD2grEXjL1g7AVj
r4oTxExrfZL2grEXjL1g7AVjLxh7wdgLxl4w9oKxF4y9YOwFYy8Ye1WcILZZ
+w9pLxh7wdgLxl4w9oKxF4y9YOwFYy8Ye8HYC8ZeMPaCsVfFCeKKtb+U9oKx
F4y9YOwFYy8Ye8HYC8ZeMPaCsReMvWDsBWMvGHtVLP0jQ/OPDM0/MjT/yND8
I0PzjwzNPzI0/8jQ/CND848MzT8yNP/I0PwjQ/OPDM0/Mh6nZ5Ak+v6vube7
zPTsyzglpj7AVvmxhiqPk5j8eltY1ieY3+tY18eLpX+ql49cSy/tI/+l6e2V
KHak92e3mW5eljgDzO/rzvrfAE8RYPoDv99upRf8Hox95Ef6/P+bLmY5ZXr0
Ra7rS36aXPqz5E95uj7kl94dO/kYens2sOyT+0ddjv+I/aQHI08vvpVLFLLs
M8umZ5AsMfmhP/qA04tf4pH1RftSHvnNTp9vU2V5pCc/3R4w6fk96dGf8pFT
ns4HUB756f61Xj75Iac/pQ/vtb6yPdKnh7f+Ep9KH9+BEn+ZrnCwxG/SfxAq
8dj0+SRcYmt8R0rcMr38KIkt/aIlfphuf4zE6Ic96AdGPzD6gdEPjH5g9AOj
n1p/0RKjH5jxrvfHwun97Z3sb2DaG4x9YOwDYx8Y+8DYB8Y+MPaBsQ+MfWDs
A2OPb/rweCXtAWMPGHvA2APGHjD2gLEHjD1g7AFjDxh7wNgDxp6/08fPQ2kP
GHvA2APGHjD2gLEHjD1g7AFjDxh7wPQvMPrftyZYqT8Y/cHoD0Z/MPqAqT8w
9QdGHzD6/Jo+v+yX+oApD4y9YOwFUz6Y8sGUD6b80RYWlA+mfDDtBaa9wLQX
mPoBoz8Y/cHoD0Z/MPqD0f+8VZ9SfzDtCaY9wdgHxj4w9oGxD4x9YOwDYx8Y
+8DYB8Y+MPZtsfqvtAeMPWDsAWMPGHvA2APGHjD2gLEHjD1g7AFjDxh7nJ7/
/b2U7QXGPjD2gbEPjH1g7ANjHxj7wNgHxj4w9oGxD4x9YOyz9ofvpH1g7ANj
Hxj7wNgHxj4w9oGxD4x9YOwDY5+uL/sb9NX3O2D0BaMvGH3B6AtGXzD6gtEX
jL5g9MUfQF8w+oLRF4y+YPQFoy8YfcHoC0ZfMPqCLX3jjHTYxyPYn+r+Bftt
a//vkBi57r/hjyCnPPLX/Sl9f67v98nfknO+5jEPpuuTJDHy9Oao7zaxDzn6
zLD2z1I/lW9IENQH+CcrP4lVfROEK3282b+vl66AXb+qf2n7++iv+2voS33q
5eOP4V/o7YN/gL+gy/Ev6K+6P8Xv0UfHuv/G78Gkt+Yj/DPyT/b6M/SXFImR
k96y1+U9P7TzA2v1GY99uv+q2096+BTdP0EOv6LLsZ/xS3r4F93/Ij3jm/Tw
M7p/RnrGP+nhb3T/jfTMD6SH39H9O9Izf5Ae/kf3/9TzYPu8HH5I9w9Jz/xD
evgj3X9U/eFomR5+SfcvSc/6R3r4J93/VPOPlfwG66V+Xk//pT9z/sv40M+z
8ReZ7/XzbeT0DzDtD6Z9wbSf7v/q592q/2r7v9S37g/r59+q/xybwT/Wz/d1
f1I/L1b9UbfE1JfuP+vn48ipL92f1s/LkVN/YOoPTH2BqS8w9aX71/r5OXLq
Q/dH9fNk1Z91Z/C/9fNz5NSH7o/r5+m6f66fryOnfnR/XT9vR0596f67fv6O
nPoDU1+6P6/7w8jBeryB7i/r5/G6/6+fzyOnPnU+QD+vR0796fwA/jL1qfMF
yKlPnT9ATv2q9RGZgU8gPfWLnPEJpn6xB7kaP2DHA1C/uv+vn//r/IQeD4Cc
+gVTnzpfoccHIKd+4QOoX+TUL3LqFzn1i5z6Rc54BlO/6INctT9aYupTjU+w
4w3U84H43So/Hb9b3S/Y8QK6vWB1/Y/fzfhDrq73thysrtfxu9X1mHiHaInV
9ZR4BDu+APs4b8c+MPbp8QE6X6PHC+j8jR4/oPM5ajyAHT+AfWp8Q7TE2KfG
H9jxBIwHne/Q4wd0fgc+gfGAnPGg8z16fAFy6kvnf/R4A50P0uMPdH5Ij0dQ
+Z3IDHyRam+0xNSfGs9gxydQfzq/oscjIKf+9PgE5NSfzi/p8Qo636THLyCn
/nT+SY9nQE596XyUHt+AnPkZzPqn81Pq7+14B+pP52/0eACVD3JLTP3p/JUe
/4Cc+tP5LD0eAjn1B6a+wNSXykfZfBb1o/NbenyEyofZfBb1Az9E/ejxAyqf
5M7Af+nxEjofpsdPIKe+wNQPmPoBUz86P6bHUyCnvsDUl86X8XvGI3IwfBT1
BYZPgf+gfnT+So+vQE596PybHm+h83F6/IXOz+nxGDpfp8dn6PydHq+h83l6
/IbO7+nxHDrfp8d36Pyfmn+slNMeevyBHt+i82PbvfwO7aPydc4M8SA634ic
9tL5R+S0l85HIqe9dH4SOe2l85XIaS+dv0ROe+l8JnLaS+c3kdNeOt+JnPbS
+U/kzC/INT7B0Pg7A77KgjY/Bbbqz8dQ+aY4Q+czM6WnT5bn/WB+D9b4UskX
wm/yez2+Que/SE//0+NT+D3lwd8yv9IfSY8cPkXtr3Z8DXwb+aN/OuzjEfB9
YMoDU57OV2MPfKTFvybJ8QMmP+Y79TzE5qdVfeIM+FYLw2/bcuwFU5/wsdhL
+6j8DPFOKZKP1Nub9NQP6dGX9OQHf0p/BFv2OiSfTP/S41t0/b3t5+XfPPL3
6cmz+0g+HTntwXyGfowX9Adb/EmytB97kcPvqvy/LdfjddAX+9X+7sxgP7/H
XvRlvgWTH+WD0Z/f6/FAeno9Poj5AKzro97H8cj6oP7ByNXyUuT418ZjPPOf
fh9Cj+eAH2A+BzN/q/cLIjPcP9D5Evxj8gOTnx7vr/MnejyCHi+t73/YH9F/
9HhMfX1GTn9kvqA+wfQ/K/9UmZ75gPRg0jO/0B/pn7QP/QHM/GH1h1g53zF/
cr4EZr7SzpPkeoE+5dLLTxSfpP/eIzHzm3qe5xH0N8qn/vXxRP9Sz3NSvPqy
XqbK8aDPJ/p4UeOvXPL3tKe+n1XjP1NELys/2T6sB2B1/5Yq0/N76pP0anyl
Q6j7iVTtfC5Flofc+n2y5r84pZz2pPz//76gR6s/W858wHqv91f6gzUe/WR/
s8ZjgMTWeAyU2NqPhUicNb3Bski8On3/F67130iJrfEVJbHV/6MlHpL+g5gM
+TP/8nsw6fX18mZ6fbyV/RGMfWDSf5Pefs/lfA2mfsD8Hkx9gMmvaLr+D2R+
YOoTTPq96e11SaYHk/54ur7HBeWBqR8w+SWn97fbAv3B5AcmPzD5gWk/MPnX
Se+fTwT6gikPTH2BKQ9MfwHTH8C0nzUeXsv8wPQHMPp9nd4eCVI/MPmBsRdM
fvrvGT/YB0YfMPULxl4w5YGxX/W/IyWmfOZrygdTPpjywZQPpnww5YMZT+p+
NlmuT6wf+n4SOVg/v1fnMzsegvN6dT+f6P29xwSzPoGZv1gvdH1YP1R/ySnn
R91fQg7W50893uH/j2dPkfsvPT3ri6Wvr9xf055g5Op+0F/KaW91v+4v01v+
fGYppz+AkZPeGg9BUk5/ASPX52NV/9AM87+qb5i2nkRo+kVIuVV/UVIOVuNR
oqUcjNzy92OknP4MRk566pv2oj3U/bm/xNQ/mPoEU99g6g9M/arlhUpM/epy
1jfqEzn1rZYfYajxPpESU586Jn/qEzn1peYXa+j9u581X8rxBmZ/BGZ8gfFv
wMzPupz1mvYAUz+kp/7A2Admftfl5Ie9yLGvobW+SMx6j31g9CU99oDpb6TH
HuT0LzBy0tOf1P1ImMTYx+9pT31/0shaX6X+YNpHl7NfQX/kjBcwctKjP3Ls
AzN+SI99yBkvYOSkp/3BjAfSMx70/ZZ/en+/I+3TMfsv7EGOvWDsI71sn/Tx
sUWgH1i2lxejz0br99KfANMeupz9GPqB0Yf01C8Y/cDoB6a+wIwPMPrmtepT
lq9j9m/oA0Yf0jNfgtFPx+r+MlT7fYTE9Hcw4xnM+LX8u+fSHjBy9pPUN3La
A8x4Jz32I6e/gKkPMONBl5Mf9iNnPKi/D5MY+8HM17q9V635TtrLfhd7wdhH
euYzMHLSoz9y7APTfqSnfyEH6/tv/GfKA6MPmPpn/4w+YPofmPpV9/ehMj/W
EzBydf8fpu3/IyTGHn7P/AxGTnraT9//ww9gP/tz7EVOfwMjJz31gZz2ASMn
PfWFnPEKRk566hM5/RWMXPVnQqWc+lb1C5OY+V3VJ0I7f4jMIKc86hs57QFG
rvo/0VKOfwpGTnqVr/FIfhp/A39Ij09Xz48SpP8EH6T6L6kZ/C/k+Gfwhaq/
YmP0wb/R49Wxj/z0+8zwW+p86dL5pXj1fqtHxkPp/qS6n0/OEP+PfeSv8kup
Wry6fT+A8ilPPU9xSf/Sy2+aGv/p1TdBpP98lh3fD98Lhi/EHl2u3+dGTv7u
9Pp3Ca08ia38HRJb8RFOia+l52//3srfKf1l5GD9PoFePu2LP0v9g6k//G+9
f+I/0z/ByPGX8Z/1/PX2hd9kfSI9mPzho/Xxod9noHz4d/wZ2ov8aE/9foHK
T9vvu9G+qv1JGfgQ1T7GB+d1lIe+3C93SGydN6VKPlyV2/f31frzyPrUx796
XpjxfgS/J75A5Q98tPsK9vt8xBuQHjnpWW/0+xQqn+Gbwf8mf+IVdP5azS/j
/QtVf/8M/jv5E++g8+FqfkEZytPvd6j2B2bgAyiP+Amdn9Hvf6j2BmfgD8iP
8zKdv1HbKzTDfRHVXpufID5D53vU+yQR2n2UsAz3S9TzBJu/4LxP54P0+yTI
wfw+fTg8ysgX6fdL1PxjMvBH+v0S/XyC+uX8UJfr902Qc36nrv8p2nyYmuG+
CfwMWOdX9PsoKp/jzMC3kJ7zZtKDSU//UN9jsO+b0D/4PVjnV0hP/ZMeTHrm
I11f7lugn8oH+WTgS0jP+FbPg2y+hfqHH6F+wcznnIdT35yXU7+kB8M/MP/p
fA/5sT8nP+Y70oNV/kPng3R+JVjjh4KlnP0rmPEBP4K/qPNFnN9jv44570df
+BHmT/38CznzJfwJ8yFy5j/kzF8qHxMq5ez/kTMfIWd863wQ8QXYo94fCDT+
S8fHpX5g9Nti8TlSP+Toh5zxoPNF3ulkN/Ml6fm9LgfTf/XzOeK3sUfH8CH4
l2DkKl9j80usX6SnfNJTPvHN5KfHf8NHICfemfFDfmDSM56QM374Pfrq+vN7
xot6vqjzMcHa+WWwlDM/6XwR8cjMV8QvMz/B54DhO5gP1PhsO94a/VQ+yOZX
qH/4EupXx2r8gTsD30N8DPWNHKzzL6THHpX/8cnAl5Ce9YH0YJ0PIT3rA+nB
pGc8I2f91eV6/A7+GuutGu+cLOWMD+TUF/4c9aPyN07pP9NfVf7JNwMmPftZ
lZ/yz4BJz/yq81vox3hV+S2bv2G/qfNfary2/T4e40Hlv4Jlfuw39fz4Pe2t
8mU2/8P+UufX+D37RfV8PVzjZ+zzc/aHOia9+t4E/FF0hnhWfk9/Qk5/U/Oz
z8/pb/jT9Df1vDtZk7u1+Fp5P92gfyHHn1Ljve33I5gf+T3+kRr/nTnD70nP
+qfGgwdl+D3p1fXMx2A9JD3+ghr/bcd7M/51uWp/dIb0yKl/tX7t+G7aS40P
t+O7rfkSvs4p49Ws/blD+ttgy347/sBqj0wSwy8QH0p7Ux7r5XXLH/CuL0mS
b4KPspLb8Qr472CVX3Bm8O/JD/4Mvg+svk+RLOWsH2r8s30fQY23cGnxuzZW
9UmS8RzwHcQXgpFTvp5era8UGU9Het0exif1ye/hS9T8eK/Rxlb9eeT6h31g
7KO99fhf2t/qr3b8ItjyB1M0vitJYn6vxm8nyf6HP4k+Ot+Dv0V/pjz6O/rQ
Xnp8NXLs0eO90QeMvvCDyOGv1PJt+5FTHnLLf7Tjq9EPfUiv3r+w46v19rLk
Ts0fhn+w+TWwmn+K1p/1+OpUocbP2/HWrL/4H9Q38cvqfQWHdp/Ljg9V+WOH
xjfb8cjop8aXpWbA9H/yA5OfPt4Y//xenQ9S5HhV50+Pd76Nle3BeIR/1uY/
oc5/zM8Zx6c6f9j9ST3ftfd3+v0q5gsw8x32WPtze79o7UeSZH2BrfyRp0jM
78kP+8hPnW8dEvN76gfM79X44WQtP1sfqz8kS2z5F3b8sX5+o/c39bwrVTtP
SJXnDer3TezzBcYb+TEe4JP1+Dd1vNjfP9H2J/HsZ5Br+5F4bT8Sz35Uj0/T
49FID5+g3r+w36/h/BC+TttvxMO36PFUyNmPqOcPGe+76O/LkB7/Aoz/AMY/
ALPfB7Nf1/ldnY/V+VVdXz3+C36N/awu199D0eOrkcO3gNk/kh6svj9ixzuB
9fdD4L/QB/6K9QT+iPrV453U+CP7+x7oixys3p8Jk/mxPyY9WH+PQ+fDVH4r
0NDjxbk/Q38nPfrofBvpKV/n2/T84Lcoj/gg8gPzez1+iPWO+oZfAiOnfuGb
6B/kR3/Xyyc95YMpH76I/PT3AUjPeAGTP+npf/BB9Dewyjc819YbO15dv4+v
p9fvs8N3MF+z/qjv4ydpcvu9fNYH6lvlC/w0fz/AUH9v349m/mM/AUbOfEd5
1A/pwaRnPkQO1u9Hsz5y/sj+g/rT42HYP6j39e34F+Tq/X073gW5ep/fjm9B
rt7vt+NZkKv3+53a/X6ndr/fqd1ns/kInX9Q90e2v8p+Gkx9qe+Jp8j9O/2B
9Yb0YPgqVe4vMftbMPwQGL5G/b6W/T0u+Bf9PIvzHMoHUx6Y8sDwS2DKV793
ZX8fC3+B9YL8weSn3pe0vzcFnwQmP+Zz6ktdL8Il5vf695nU85Y4uV5w/sh5
Bf2B+Zvfq+cbcVLOeOI+peTv0/EWuZ9Q3x8KkOcT9Ff1Peco7bxDf985WsrR
Hzn6I0d/5OiPHP15Dwj9uQ+F/up7QgHyvhT6q+85R0k5+qvvO0dLOfojR3/k
6I8c/ZHTP1jv6B9g+of+/R/OcyiP9ZPy1POeOC0+2EeuX/RvMP1b/f5OZIbv
76jnO3GGfl7DesZ4BVMemPEKpnww9qvf84mWGP9YL4/1kvoEUz6Y8sGUp36f
xv6eDeWDmW8tvtwh65f1Sp2PPbL+8KfT+2tt3luw+T9rOndr7wMQj+CUcjUe
ySX5NfwzMP6jlV9shvVEf4+E9RT+An01/lK+16vHM+jvuar6p0pspbfjIdCX
+lC/D2PfT9bvh3n9YRmvhT8MVv3pZI0/ScqA1fQyf3neB7+hvjdhpyc+D4x/
THvr962pT+2+tc7fyvvXaryRfR+b/qHyaw7Jx7H/+//fg7Df/8VfB+vxcOSn
3i93au8v2+8Bq/klZ3i/l/gY+Bv1/WCXjIeDL7XstePnkMM3gZGTnvqivhmv
Op+p8hH2exiWfh7Z/6z12qPFh6ZofG1GvhU+k/Ggf39GjTe0vz+jxvt5JKZ8
6lO9v2d/rwb74U+xT+8fqv6uDPGG6v0xW67Wr/2eBRg59lF//B59VH7BlpPe
yi9V9if1/nuyjIekP4Dhl9R4J3+J4Y/U93eCMty/U+OdIjLcnwPD7xJ/RPlq
fJWfxMj1+27I2b+A0ReMv6LL1finICnHf1Hv3wVluF+n3p8Pk+nxf1X9wmR6
6gc5/qOqb4RMT/0hZ7+lx7vBL+GvgOHz4X+oT+TUN5j6AVN/uly/f4ec+lPz
D5UY/0+X6/f3kFOfqj4RMj38I5j9CP4L9cfvqT8w+yXS458jZz8JZv3B/2B9
wv+gvtX4NB/JbyHX7wOCqV/1vl6gxreFZuDL1Hi3MC2+LELK6W9g6k89f4mT
cuzFX8Je/CXsUfk4nwz3AcGMVxWHSUx7g/FH1Pd1o6W/Rvuo9xXjJEZ/3Z+D
r8Me/CfGE3IwcvRHDn+hvjcbIf0x/CfS0//A6K+WFycx+uv+3DdW/nK/hf+E
vsjByOV7HV45+qvvx0ZIfwz9SS/5ZC9Gf7W8OInRH/8LffG/6D/6fU0w/QNM
f1Dfl42WcvRR74fGSYw++Gvog7+GPup9Sx/JdyLX73PqfCyY8azf11Tj6cJk
evq/fp+T9PAh6vtOUTI97aXGL8YZejwjfCv2qPGAPpJvZb0gPfYgZ34CI9fv
a4Kxn/TMX+r90FDtfZMwiakP9T5npMTUj/r93Cgpp370+6Hkz/yv33clvpD1
FUz9qPc5/Qxdrt8HBVNfpKc+wcjV91qCpJz1Vr2PGiTTU5/IqW/1PmqYxPQ/
XU5++P8qPxEh09Meqj0Rhho/GW2o8ZgOLV7FIc+n6Z/w39SnGk/pJzH1C2Y8
gqlPMPWt3p8Nkpj6VfMLk5j6UvOLMNT40khDPX+OzsD/q+8xOuT5M5jzd+pD
vT/qI/kL/Gn4CeY79b5hgvSX4BdU/ylB8inwM/xe42ck1vkH7udRPvqQv8pn
JGjxTLbcGn92vBH5698Xwt9DH5WPsb8nRH7ES1jraYIWPyH5Fe3+qH0fkvpA
n+1efkjTR/t+rM0H4M+r+dvf0wQjV8/TkzN8P0j195zSv8cfVeP1UuT9OjX+
yb5vR3ryw18kPzBy1R+W7afxcR7Jr6jvrzpk/2O+0r+vo75XE6W9v2LHE7Cf
V+8LpWj62e9jEj+Af8p8Aub8TPeP1e+vBkg5/LrqDwdKzHmaLle/1xoi5Zyv
gTlPAzP/gNnP6XL1faZIKee8Dcz+Sn9fTn2fNVq7rxSTAZMe/gd/lvGgY/wv
+j9ysO7fIoefASPXv6ej8w3q92b9pJz2BtOeqv8eKDHtCab9wLQfmPUXTHuC
aS8w7anaGykx7afLsY/9D/XH+AHjT3D/ivZQ/UV3hvcASc96pH5fx0f649Q/
mPoEU59g6lOX69/nQU59gqlP9fcRGj8RrvEFkVp8TGSG94PAjA/9Phz+Jv1V
vT/mlhj+WPeXkVNfYPqjHl+jf58HOfMRmPrW+QV+T33q8Tnq93rCJKZ/kp7+
Caa/0X+oP+TUn1of0dJfpz7xf+lv+n009b3cAMkHYC8Yufp9Hf17OqHa93Ei
DJ0f0P1p7/ZiN7/X/X/dP9ffK+J7Kpy/6e8P4X+D9e+/qO8TZXyvSP3+TLSU
ow/+IP0VTH/V44/U7+/6SH+b/gqmv4Lpn7p/jJz20LH6PZjMWn6ZDTUeKlC7
jxeaAevfg0Ef5gv1PdDQDP44cvq3jtXvyURo+UVo59X2+6G0D3LaR/8ejP7+
J5j6198bhd9gPOjvTanfEw6UcuZfMPOD/l4pv2f+1fkMHevfi1HzC8/gzyOn
fnWsfy9Gjy/T48m4T0j94p+q9yNeS6z7+8hpDzBy/b6j/r0Zlf/wk5jxAqa9
VL4jUGLaR5er30sOkXLaD0x7gen/YPq7zrfoWP9eDXLaR8fwBew/kLOfVNPb
/At8nl7fvGdO/cInsL9Tv8fsJ+XUN5j5CEz9q/cxAyWm/sHUN5j6BlO/YOoX
zHgA0//B7Ed0uf79Gz3+kfuK+HdqvL5b8in0V/V+o4+MN6R+9ffD1O/L2N+P
xj4w+unxkPr3Y/T7hPr3Y/T3uonPwD787SXe8074BPTHP8c+/XswyFkvdKx+
vyVMe0/Yfi+Y82D8b2t+d2c4b1ff+7bfy8A+9fw0WcYjqv6+fd+J82nu24GR
kx7/3NLHLeNNdKzyK/b9FPgR7NX4EcmfwPfwe/U+hf19Evga+Bv1PSg7vhd+
jPLU+N4EyR+q9/mSZHwL6fm9fv+F/oVcx/Br6A8fp+kv+Sr1eyg238T8pd7v
SpbxBaxXavxBsjzfpz7oH+r7SomSb9HjUdT7c07J96j37ex4KuJF1O97uGR/
Rq7eV9PfX+N7Iw6Nb3RIPoj+Cp8Gpn8wPsHq+1vcJ3HL/IiHACOnfOIp+H36
dFDdR/KXxFfwe/X7IS6ZH/1Vjb+w413U8Zbi5Tfs+Ac9HgY+Tf0+hEN7rztV
8nXwWbQH5avfg3BLOfoyf2A/7a3a65JY5f/s9iFeBQxfyfyKnPlHjV9xaf3R
LbHav+zvy6jzoVvWJ+0J38R6Rv2q36OB76M/OSWmP9Pf9PfL4VfV/uSQ7Q/m
9/r3aPg9/Q191Pgp+3s26veoPXK+YD1U38PJrL3/Eqidrwdr8QChGeIDSI9/
ouen+tPB2v0a+70Z9nv8Hr4Df4f9nvreaYx2PmR/j0a975Eq41uZnxlPzOdW
/vb9QsaLNX+nSkx8Kr9nPuf3zOeMB8aPel/Zji9EbvW/WO1+baz2flbG+57E
Q36fnsBeL5CjD1hff5GD1fvivG/pkfmnV4/Hzo/ySG/lZ8dzgpGr90vteD/6
Nxi5Oh/Z8wnzhf4+KP1dvS+bYoal/577xfDLyRq2v3fFfKHHB6rnE3b8HPqD
kaMP+TM/Wf2T8xD7fIb9CFj/Ho8aj5si78fS/8D0T/V8NEXGL/N7MOn180M1
njlVu1/syICJlya9jvX3O9R4avt+LXL9PU7aB39Jv3+KHH9BnX+jJcY/VO/v
xMn1wKqPOLn+gElPe3D+gL9AfB3+Ihj/EIw/CMYeMP4fGH9Pjeez4//wl9T3
4uz399lf6PdJwegPRn8w+oPRH4z+YPTX4+/g47EHOfqD0V+Nn4sz1Pfj4uR6
Bua+EPbp7/Hr369Hjn1g7ANjHxj7wNijx8fp359X+e0Y7b5TjPZ7G3Nfhfzo
v6zHYOyjPsD0V/3786y31Id+X1d/fw5MfYCpDzD2w49jvyqP0eR2fB4YfbEP
jH1gdb/L+27cR4zfjb7q+3Ph2vfzwqQce8DMJ+SHfmD1/mD8bvQDo5/O3yOX
51np8i2SLwIj5/fwR2D4OTD1q36P3ObzwaRHfzD6q/r6afepQiSmfP2+Fb+H
36F8xguY/g0/iz7w6WDyRz/9+/Gkpz+D6c9gxjsYfXT+Hj6d+Qk59aff54Lf
RD/1fb44Q+fnkaMvGP3A9Acw/RlMf1XvT9vxbeiv891q/JVbYvQBU39g9AOj
Hxj9wOgHpr7B6KuXDx9D+WDKB1M+mPLBlA+mfDWeyo63or7U9/Ts+9e0t/qe
XZzmX8QZ+n1x+CDs0+OxvPsX+f1kPT4LOf6zBZ0aH5Ikz3vV+8MB2nuzgdp9
4hCJ6f/qfWL7fjH1ocaD2PeNWW/V+8V+2n3iQO0+cYjEzCdg9FHfo/XR7hPb
94v5vbofsO8X83v1PYkAiSlPvW9s3y+l/6nxxgFSTv9CTn7q/VQf7b6ofX+U
/sr5FfYgp78ixz7k1L96X9RPi78M1O6HhkhMeWDs0c979PzV+6AB2nuVgdr9
0BCJyU+9H2rfF6V/qfdR7fuh6vs49ve4Lf/V6z/+wftRdnyi+r51nPSvwfr3
YtV4Svt73JSn379ETnnq+z9xkt8Gq+cTSUK9/2r73/hD+D/MD/j3YPW+W4L0
/1V/1f5ehBp/laTdt7Pf74fPUPlem5/FX9f5VdWfzvg9W/0+HOnRV+WzbP9Z
5WNt/wyM/uyn4SfYTyPX40n0+yNg0uvxHno8B1i+h+3dz5Fevz8BJr0ef8F+
Dj4POfrp9yXU94LteF74G+Jt1e852d8v0eNb8a9V/tchxxvtZ61fMYb6Xl+U
nL8pj/nYmi8ivOlfyfz0eCnmY2t9jjT80tV5LNsHOf4V/hG/Z7/PfIO/wfwG
Rq7H9+jf06Z9sY/+wPkkmPYifzW+197/b7H6h/S3wMj1/sXvyY/9NunpT+yH
1Ps8YRKz3uhy9b2GSImxV33fIUru97EfuTVfRhu509vjguxvrIesF/Rf7Gf9
RH99PVX9Gzs+hvZnv26tT2GGI13+SNB/wKRn/cQfV+/PxEj/hP6pv1+tvsfA
+zSvZHr2h9jDfKzxV3L/h5z3/lgvwKxHYPV9Wfu+sLV/ts8v2J+q3yuJlemZ
jzkvgQ+1xnuS5EORpxd/MVbyt+ny9+DL7Py534++1635SK6n2AvfjTy9f02N
lff94aOt8jxyv628Pyj3y3a8P+e56vfrkyQfarVnkpx/OR8gP+X7Pu95+fGj
Hhk/oK5PyZLvZX3V5fr3dVW+OCHD+ZZanw7tfoa9/rIe6ueZ1Ica356s3fdP
lnw62OrfvE+np0+V/LrlD7De2vw62Npv2e+hcp5F/9TP29ifYY9+Psb6jn3U
H+dbrAfMl+r7QDGST2M+GJxu303JBzHfWvYlyfVQ/d6W3R+t8WVjJb7hot1f
1PFktx/+JHy6zufrfD/nP8h1Ph/+3Bpfqd7zHfu8ivGC3Jq/7PdLiAdnPgLD
x+j30eFrOQ9U+dzIDOs7+wHGu3q/2o4HZj1R+dAouf5zfkp74W+D8Yd0Po/9
Hvmr55lRsj+QP+sf+YPJn/XO6n++Mj1Y59NUPi5Wxmep/v87yX+p8V2xmr8U
K/kJzpus+rX9d+ob+9l/gRkf+FvwMZSvfi8hoz9Ef0I/MPMd41uNV0nV4o0c
cvyr49uO98YedX8VmeG+sXr/JFbjM2Iz3H/RvxdD/wGz/4OPQk58G/ogp/2R
0z/wr9lPsJ+BP0Rf9b2mWEONJ824/rN+0j6qf+uW8RC0lx6vhb/Lesv8ZfVv
e/6mfMa/VX6k0T8dvzYXp8vpT08lbpyu/105Hmkv5msw/DiY+Vh9n9Lmk9FH
7Z/2+3v0B+qT/gzGfvW9+zhDfY8oLsP3DfT4B9ofjP7kz36G/QrYWn+ipb/E
/nFXuv4vZP/Gn2G/q96PiDQGpGf4r+Tb8DfA6Cfjob3+BZj+jD9FfwUzf1nt
Z+/nrf6bRe6n0Ve9HxAp+7vV/+z9N+3Bfpv9OLhq+gYgXO6n4XPYb6b/PCVW
7jcZD+yn07Prbvdn9FHPm2xMfTZLL/+q3D8wf1Jf+vuEzA+WfR6h1zfzK+nx
30hPf2H/jL6sn4wv1ifGF5jxpe7nfQzqh/wK/1irbqEfE7R4uxSxeUeo48JZ
+/2xG/Wezdkx0mNWuFWnTp7hKUI9L08Qn/c51/L4fIe54NCXF9Z/m6rxA26x
vOuk9U1eeeR67D+/54WmG+3vH/40Mi5bG9PGh0/k+bpydxs7cxQ2c0R4zAuz
XfX6XYDv9ok3U+ZWmuZnv19dc06ByC317Peqq2S9vmjGv/Z71fhbbT/ZvnDo
E488v4xunLK0QDuPGZPryzrLttjxAte+PBHRMJ/9/vThr89kG/vCjh/YPHdU
fM/89vvT4z2rTjpddjwB9bfMVbl34IcOaf/zx1Ghz++lSpx7YI41Q1s6pL2/
/rB96IG19v3SpPx35u4s55DrybJVH62q1dV+r3rapKapC/0d8vx6afsLa0r6
OSR/kGvbulU/hTqkva0/rDT6cWaHfR/0bvf1xR/b71W3KjbPtXx1qnlg2t+l
cy+PMdT40BTR6kn1lVU7J0r9K+bpt/xgXvs97UJNcjZ42yxR6ndxTGr3tzkT
pX4N1ozcMv+9RKnfF+0bvz3YJFHqN+vrrFsG/5Yo9Vn/4kF/d/ZEOT6jgnJ8
0H+rff7wyc3UlD+CEmV/3P3fy26tt9jn/3/VG9h13Od2fEP2Uc+L7rprxzdM
aluu4OqP7fiGLR9/nuXJvdfm1XVjihf/z34/W36/cv7WL/L1eW1WHTd68MWA
CCm35osoI2jo46cNKr2R+nWa3WFQ3jxv5P756q5Wp6oNteMvxhRKzGf2tr9v
F/T3wyPvV3hq+uYrW2beQfs9bPRb9ev2YvOq/Sfrq0zi7RNTFz81Gw3/Z5vj
iv3eNfV3fufEvgM+tN/rHrJ4xLpvpt01n3X7PSggPEXyYcOqzr+f9J1T6Pub
NzFBkyZWvCf7S61a9WrtC7ln7uu7YuLJXfZ71jta7ep+P9E+n89eoW/9SSfs
8/gN/qu7Xkuyz+PJb/PtjeObDzttLntx4aMPL9nn6ZUrtyv9LjBW4sdefVl/
unn1lftprz7gv7z6gLGne+5n4x4fvSye57XqV76f7a0//fxmdp2VwW9XX5Tn
PTE/LZxwrPx9sdXbP/T3rre/vtf/ftUHori3f+jnxyGdxi7a7rHPq2sfqlF5
fIh9/nusbb6As/mfSX07nzBX9Gxvn/+Wf7s88K+RzyRf13lOatB3bezz3T5l
W5bcVtU+3731qPkyc+8bWd6o/tv+ezHijSxvev6O/g8f2e9lz7z80b0cHW08
Muv4xld72ue9yQ/KDWwYbp/3uuu337T2nzeSz5rpm2nyiKVvpH7fi59Kbxxn
nx/V/fe0T2qnN5Kv+/2fgYU7p+2/znnnG/wZ9P9izbOSt5okicre9Uc/T43L
+8zd6UGixKW2jPzo2cQkcapo5PNVN+33uLF31z9XN/ZK89vBSy85p8/60z5f
HtysSJFDzxLt8+6uxq/z19jnzR8uC+1wJ9jGBw5uKNHuvn3+POWDxQc3tLHP
n7v+9U9944x9/ny1WdcuPfLY589vup/5oeBf9nnz/hXzh1WYlyRSc1rrEfpv
8K4/YOaTjptib/cKShYDveuP/r7386Nf/11wtUMsqjNpr2uy/J64QX0V6dxu
Zdn9dn32v7fs87Ol7PNp/w/GND28za6/4p/WrdCwnP09tqCWb4JOLHNI3DV1
1cI7Fe3vr51qnfNF9d0OibNuKHOwQX/7e2t/xYaumv+vQ9aXcfLzMc0zO0WB
l0OWnO6Z8T3wZ4sXlxkUbX/f7HTKqAfHAuz3v3/NmnfTjfsOezwcaXDgzU6H
PL/v4XzboeNqu/5qPOh8b2pep+he7fCM7z32+98fVth/L7hrJqPCDwlXzm9y
mLsOFf9t2E4/o9Gq7YOrLXCYrxeuKDFtqJ9xO/Vgz6w5nObsuwVHV0sOMOK3
t7zvu9Fh/jHW+cHYjQHGuP6rZgz4yGnOXRuV3KVskHG7T1julJMO88Kgad2G
XA80Ol+NE+eGOs2sO4sn3u8TYvgu7FOnziOH+fGc3gtebcli/FNieP5BLx3m
9aPdduf2jTDiQ3Jm6nrfYf5dd/xX19ZHGltPfBk54rDDNCf1+Tj6WpRxKLj1
hkcrHObji18mHvZN2z/nzxXeYXba/qHBqFpLcsYa1ed94NsgLX2rEvu7Tu6b
5g8Wm/3y2MNEM/R27YirX2cyvrrT8fNnEUnmF81/33b2sJ/xoM4HFeo8SzSL
ZSnoLPS1n9HwdNnfflmRZNbLfq6w6ZvZKO/T49stmZPMiz1qrxu4OMDI3nFc
7/pnk8wFA8KLNS8WZGybO+rnyw2TzNUB4UcCa4YYO3fEDt+6LclMmBG4PuFS
FqPOs61X8sYlmV1jX6SWuRVuTCgxtOPb+UnmleRBk8fsjzKq+v826Gq/JDNv
rfatXX6xxlcDSk4fOz3JPNh/evKloSmiQYtfY55tf2MOSXrULmc1t/g79vrF
1xPemKfaHNy5qngm4+9VJ+4G+7w1/z6d85dCB/yMzJ7NtT/t9MaMnXSyR3Ja
+3x78daJxFxvzbv/PJ125/20/eLyir/3O/HGPGR+XP7LkSFG+9ToUTuXvjG7
OedWXnsxiyGO+f7Sd9wbs/+izK3XlIkwmpz/c+zOtPyKZq5R37U/0thevVOZ
L9P8g3IhgX8kV0wR/W6X6ud7+pnZ/Ifn7/LscomhU8aXavDfM3Pa7xsePGya
ySg57PSp4XWfmf9uGbC4WuYgY5VfyX/uXHtm/jil8NLqN5LF5AbH6z3u+MD8
Z/bZBl/Ndok6JxZUKZn1gVnro1fDz2wLMJaverK9x+X75rjXnjmti6SIvlce
FarT4KL5IEu1YfWfxRiZJ6zcvGfmJXNB0KqR5U8liw86FFu5ae5m8yffRr0e
JQQYE4eVfhhW4yczokLvn7+6GG38d9V1em63deach0fCN6Stv4ervdjqnrzS
LDHnu4NZEpPFr4lRQ3cFnBQ3He8+6ngt0Ph21dE9198/IbaZnbqlNgoxTi3w
u1Nnxynxc4nudcqcz2K0jXhwskSds6J0pxXfPnXGGMvDHraomO2U+Hpm5Zor
3vkYO/xjApr53RE5tncZ+/K4n1EkeOmFF9XuiXu9TnT5oV6IMbDQmWH9dt8R
/neHxpd+mrZf+LrTst/y3xMtmnz1LPPoSOOXCg37pRp3RKEri7bdSvIxHv95
pMiZD5+Ifzw7F+2fmZbf/uwjTw58KvqvOVRjX3hmY/Sl/H9XqPefKLDsUuzc
m4FG4Pu1TiZ+8USs6ral86EfQ4wjv03dle/wU7H0rKtJ8XIRRt5SA67NrPWf
yBcy7AfXsEij42+FPvqo5BNxZv+US3VuRxv16/X6rk3mp+Juyb/+bDDXJc73
mrBmQtfXIluRzv7ftE3zXz7KdOXy89eiVf1pI0+19zNa1ji0pl6X12KneT3P
q6cBRsqd0/s+evFavDvReFI2d6DRcEu+QfVGvxYFK7/sWDNXiDFenHM2LP5a
/PL7nb+G348yctQvOX1x5Tci7yd9evdMG9/Bo09WCsz/RiR+HDKnQ1isUbPM
ps2zdr0WLzudXjhsbIooVvbA5fpDEkXbR8GHb153ib59vr71VY1E0aX3DxUO
101bD+OOdTjaPlG8Pz00y/kBfkaWyJaPFuRNFM7fCqd+szPA+DU5acnMPInC
3ygYOi17kDH97peLvq+ftt4emTP/2+khxpI1m2b5rUgUuS5GfhN4LtxoXmaM
c05Aong1JKDIHzsijT/z/jvDtSFRVA+pl1DtcLSx+PzhkQsPJIgfjpaeV+JA
irh+98/kOvUdIs0taXs5rX/3zTz4598mpIrqx2qEdXC4xOAFZRuUfJkqPvoi
Zd+Dzm7xfYnn7q2tHWJlhyK5BxbMZHSo/Uez3mtTxfrjA2ZM7ZHJ6Jfn40pL
y6WtN+Vdd3rX8DNcK47+mbVBqngzJ8/6T372My53C2l0KiVVVPzzUdvh1wKM
ah2yjHr2OlW82O4eNqpwkDEh++plG5JSxe0vvjg6++sQo06e89knpZXvv75Q
1vLLshi9+p+dNuJwqvi+Xu/Y6L3hRoUOJ7q+7ZcqOkePmDGpi1scLO7/evlT
j5jV+NxHG0Lc4m3XtisOzUzz3ycWfnfmD5cosHx9qycVPSJwUYH6Eb0yGY0C
q51+/o9HNB02uNS12pmMGwfuLBjzvUfMa3s0ZlWeTEbvH8d3yVHaI25XzJ3S
L61/O6uXKL3pnlvsHl10w+6NfsbsKVu+8ez1iJK53su2c7yfMWj34rrJfT1i
6daYUX928DPaPp+Y8/V7HnHo0YW/h78JMEZmGdqz4jaP2Dxk5csLhwKMNqWy
n3/YziMWBQ8qWHJBgFGy2Y7q8zJ5xOLqc09l/ijICOvTs3cm0yMKJ/SudTUs
yHjvVtaWv7X1iI0bam9flzb+Szc9WK3hG7dIeL/3ws+XhxgLno6+3el5Wv4l
mpV8v1uIEeXfMODJYI/oXeXD+HvFQ4wJeWI+6O/jEZ1PVKqxN21+aJw6wedW
Wv41H0ad7D4jixFQqnrespU8aX7lskkbQtL8lxaHBw38xSOe3uz85OiucKPa
hYYfrne5xayZja7Pzx1r5K7Yr3qbTR6xYV/c6W4/pO27ZovxLy67zLrlpl3J
vCJJnJi9qkOPXS6zcOM/oiYeTRLrNx6Z9+Suywzscb5B8KskMe3of2d6BbnN
R6MTx0zOmiz6PAgPeVbKbXZxJ57bVCBJPO0Y8VlUdZc583mdqQ3T9qFZm34R
vaGby9x9Y9bHj4YkiVo11x3/5CeX+eOIP8Y9eeYQqe9Xerct1WUua7TxRdAK
h7jWvMqUn+u4zfc6ne128Cun+HFomyM3nrjMb1PeL9fnoENcjvpt9rgGLrPG
uhILhiQ7xNIDW1JnjnCZ/l9U8Rlbwim6fWt2WrTFJf3b4hXPxww/5jI3J9/+
qtcX9nv1p//d3KHoShv7hsTfvzM0SYz/+krPWrNcYr63fnZb9SO2eX8P33nO
+3vwlT1NT/22IdY4Hjs2qX+WtH5c9cg5sTljvFO2Mu6G8wZ6RLYth5pdOmjH
h3y3+I9v7uTP+L69Gf1rx6CTNr/004rYLosquyTee7XukHuDbPwkYujUoptd
ZsJ5kaXN5RTtPmWsMeXDriseL/CYfx++VupENzveivJ2WOWJ6TtPdy/YIVEc
+WXc8zJJbjN7zn+3j12WKMosq3s6xNdj3l12tfybeokipXC1RkPWuM3z437Y
VKZ3ovgv9PY/20+6zQGTnYVDKyWJ07+OnlhgT7J4da3bpB9q6/FZSaJsl2Lv
z422cXyuq/lvb3KIOd7y91nliwfe8hxWeeKSt7znVnliYcDQkbtnJYrNU67N
q/XOLf4oe+ur3D3teK/WE58O/3CBjfe1mtrubtrv6+xYeafWOKdYVTBg5q0W
afNylsDyLXY6xcwBrRau/sz+/t+vNWPePPzYjhd79dL/vx1r7ffzkZP/Fm/5
pP/MWz742q12o6818zGeFju4oNwVl3lwZ91B73/rYxyuNapQ+C2XOblG8fZX
F/kYnzb4JGFUSbe5o/fdlS2K+RjrV28fP6iuyyyWK1/S0iY+xsyAih9EpI2n
JVsDt4c4HOKv5Y2XNmiXYs7z3/8sVxOnuHj+z2L/fZRiXm1xb8qhKw6RLf+l
I3NO2O+tJ14L/7F+PZfEBR6kzls1yWXmXFfy9cv9Gd/nP7ozR8c12228rWKn
5Uuup0pcqWJ4ndINHWbP7yZ8eTpt/jg+I2z/o6Yp5nfe/nDV6g9mirc/6O/1
H7PaX2LD6h9mv6Ytpk/J7RKhTX/+L/q403RcXThg60iXOH7ysvH7bqfZ51Jk
k+P5XaLGscZ5zI5Oc+WJa+/3f5As5gevjdmw1WlO3VOuxsgFyeLH1Exld/ew
vy9w+fT4HlleeMziRvCvBednfJ+/UuYKBQYd8Uj+OTCp0r1R4z3mJ4Hi0e9f
ekR2x/fbf1ls30d++n1k+ZBbyeZ/5pbnG+e7RD6/Ee/Fzneba2c0zL1oiY/R
d1Vys71LUsypIaNWdvjCxyj3y1edaudOkfXfrmNUiv+xZPNd8e9b/TjPJcql
9p3VdIr9PdEexc7cPLPKvv/a8ee1z3aWTvOPfru+vt98j/ix+fg2OWunmlEL
q0UPXmq/T8/5Ye/VBXLMOG/j6lMe5fmkrc23rvHsvb2zmVviy0HrkuJm29/7
vTCzSsPeox0SdzlzoUfl5zYeejj++scxNt990Hf4wuAWKebLEb4DgvslyPhF
8m/62vGlcTPFTPTKOc9fJSLyOyb5GkM2Px9RNdll1ulfvf6cLr5GtWazywTV
dqfNPz37lxS+hs/LyvcuTnObI8/OnXc4h69xaNqt2SuuuM1vkqv/+udVX8M9
+Hr717Fu88fBR6tMjvAzcg58N2Xhj24zucfk/h3K+RohbQen1DrsNAO/r9P6
bS9fo9jwpwd7V3KZ2ae5q01c4Ws0WNZh5tzVaevJXyVzfXXB36gaXHvz1gSX
ub9v694/rfY3Oi16Hd6msdssXWjkHnO4vzGp9LLeqSvdZra+bbr/XTDAKJRj
xP7N2d3mjGGDS77pEWDEldvdJN9yt7nsXIECd+b6GxXvZa3qcjrNxr/svNDs
tr/x08Bai29NS7M3U7lHNfIFGmPiT9So98JlHgiqMm3w88zGuM17X19s5Tbr
RBrlN+3MbIz99Y9VXfa4Tf/Cn38/pGegcU28PfQgwm1+urPJ0d93BxpDu13r
VHu729zfJKnS92npW//0gXi6yWn+fOfm9moxgYZjW3L1r79ymXPmL63SfHiw
kfn6mD0909bLSn1fLigkgg2z9ANnfNp6fL22SE3JFGwMHVunenbTbb5/eGCP
1J+DjWcVZ32/9JLLzPz4p3ptUoKNXcNOVfksbTxsOrFg+uYPgo3QOrf+CfN1
mf+eOt904KpQY9KODX/2DXGbAzf+1s/9RajROzlwcNsFafk1ebqtdUwW44jr
2ctw4TZb/JA7avzCUKNk++ar+zR2mVeMsQ2Mc2HGP7lvP8iT1v7VHn9S3jU1
3Lj5ONuR6GVus8CIxgXr+oYb62PzrV052WUG+QUk3C8daQy93vVYm79d5ow9
KV3P+aT5I69nZV4y2G3Wrn0ubELjKGNbgQNTYtP0X1Pwdo7A7FFGniUzPo9d
7zZrTvrMMbJ7tPGqZeXUoT5uc+yYzxMHfhtjJG7bX+5tO7fZ52XX1DMD0vpb
0MY1H89NMcvXW3F2QDFfo/Jn5R1+RVLNIadnpFT6z9d4eP3Fw/WrUswSj1tl
v1nL12gS9n3BpJbJpjl46atW832NQcXDLz72JJsbFtbMs+SBv9HdMX3iu1op
5qT3XgzcN8ff2Py29PUN91LMLxZdi/sqMMCYVuJN6s6GKeb7/Yoeatw3wIg6
N+2zGTlSzf2xy1qfXepvtMrzw/C5w5PNx+3rBr19k9nIGh91efZfaeXfn3ip
5opAI/OA3W2Kvk4xp497smdooUDj6J8/FF6SkGy+8bl7rdCnwUbhfX1bfzc5
xfw0TpxdcDrYKDN1btGfd6SYSxMm/H66crBxpFHRiz6Tk823SXWS/tsTanyS
u0qtD+ulzWdX14+v9HGokfWzngUWV041l4Tvuu16HGr8WsGZN7Ztitkx59PG
SRvCjDl5R+3slpJinvt1zqraj8KMh7F5Jrben2w+eByVt3hMpPEodWlKwsIU
s3LnXV/N6BRpOMOb/n7gUYp5w3kpLMenUUavMh98sDxXivnho0bHq1SKNt7N
vvJz/dKpZo6zVYY37h9j/FBhR2LttPkkT6uYMdl+jTXm973v6bI6xez9+sdq
F5cki7Xxg4asnJVgLmryVdXQYw4xd0/HRJ+Ud2bRMQNaigFOUSv4fO9D596Z
y2pUvJWzjEv8fWBe4rKfEsyOIb8c/3WKQwyd6bxf9Plbc+nSpyF18vsY2bP+
KE5GJpgFJoT22f+Tj1G94cOT+968M33yXqw4+LmPkTh8aKdiaxPM289blspS
1sfYln1os1Zl35mLLlYPvVTD16jzts9Xb75OMC8eKbr+RKif8cO46UWmtUww
RzR6k3NfNV/j5NR8AYO3vTUnd/tS9P/N1/g33tX4wqR3Zt+d0/MVW+lv7B/U
/vOfyyaYVRPvth9SK8AoMK9vl19KJ5gPa7/sXeyEvzGs3KSxrlrvzEs7RtRd
n9Yfsu0Lr3ilcIJ5ds7WaZ9NCTRKThm5PDYtfZ6hB6qe8wk0Dny61BGQ8525
pH7LmT+VDjbWPkw43FokmM9Dfyra82GwUavM6i1PWySYjS58M+RMrWDDFf91
i52h78w/XR8sv90+1Fj+z5Wjft8lmF27LnaKT7MYWRaWqth0YYJ5qeycthFz
Qo0X5XK/eJ7rnfmiUsz191+EGSkJE04dqvHOLDjoxyMbikUaU8LOxr379p2Z
/0q7hH51o4xnNYavvHXynTnn/oJhXXpGGUVHr9w57t47s/PwxT9v+yTayJbo
90lcmwRzoSfzhLA3iaLZsHlf9l7/ylx5psranvmc4sNc0dUb331pPr5+MLnw
DR9jxbrD8R8lvDLv7P1jqKuBj1HgfvVxN1e9NAfNqz2lQV9fo1/hUzXjh7wy
s9XstmbmJV/jRuHvXMfbvDJLHr3nU6iBrxEx7E7bJz+8MNdmPp3Vp6u/UeSn
+o2W5HltLos6ELqqQ4BxfOySxesuvjIP92q7deFxf6NE31lXS3Z8adYtMn76
s6hAI2ZBn1HhrV+ZixZsq1K8Q6CxpOHLC71rvTLP71s+ddbetPFaeXbCsMwv
TFe/jpubtgo2vuvQVdys/tKc0ONYrmqfhhpXVwf/4Zf8ynw26dzKh9WyGIkL
Mnf+9Oorc922URs6dwk1Ht86+nBuyxfmj3/tKfjr9TAjtMWf+0cMfWUWG7B9
SGiDcKPx+9X//fSrV+aIc4uGTC0eaSz7/suvGp56ada/U7DGd0WjjI1thteM
WPDCPFL7WJ2HafWZcnWMc065x2bDRh/d/uq9ZDEqOt9vH11/ZCYfW7h1/Y5E
cT3iQpPzYf+aZUtuLb32tkMMWHCp39IfHpmtu/2570VWl2iy7UG+Q78/Nvf9
vj7LxASPuLFyY9+uxr9mgaf9Ws5v5Wtc6nc4Ykfpx2bN96tE17nla4QZca3O
r3lkVvj75G/NOwYYS3LU7vDdpMem2Tih9r1F/sbh7nfP7Rz5r1l96ozxw2MD
jW9OF5ozs8pD80CjqlfPpdVXyUUhV8YsemReHHXxh5Dlwcb0mBxFK9Z7ZE4/
1Waf2SaL8cE217Mhrsdm86Svv/iwZajxYZsmXzR8+cB8sPv3kQlRaf7y9eyL
9+x7aJ7dlTf+cr0oY8nyimGj+j001z9qNrinI20+qd/gfpslj80/60/bs7hO
ktj03ZYxRS7eMFeMT3FebJ0szjy5WqZI01vmNyOr9X6vYpLIcvLu809OXDWT
Xi7sVforh6jsd6hTwMpbZsM8sbMrHPWIod8UaxHV6rZZyHO1Yo9+vkZozNuh
x+rdNGe531a/d9DXKNT6rz4DxQ3z8pomU/q1DDD2TanTZOc3t8zqL6p9m79x
uLEq9+SWe2NumgEzhrd574too69Ru2HDqmm/z7+tVp5B0UbeblHvR0VdN8e1
ule225kY40b/dSO/n3rL/FbkrJgcHGfk/+9Ome9u3DZDWt9uucyTKH6uXavo
a/GP+e3sFdcX3U0SQa8HlKve+aAZNNE1+uekRFHvgzHXfAv+bZYKndzE88Yh
Zt0fMbJWpYPmmPU3ipj3HGLznWa3Q7aY5prI0H6HuwYYg6vt2Tqvx1Fz94+z
Bn7+PMJoNKzK7VNTjpq3X/RaeT9tvi9TM0/5fu32mD/7Pa53pVeUcfTZkgej
Uw6aBf6ZvWpvfLTxSdy4bwMKHjdrPdzxMPp/3y/s9qCZo+dxM9Crz7vi6fqI
//JtfO/W9STR48Hxq74d4kWQ156Rlj1ihFe/9yz9RFGv/kst/cW06puTi0wL
M6LWbvgu2wdbxT2vfpcs/YTp1d81NF1/MfW3Te/9/V2UcS/VdTJryi7hHHZk
fpY0/T6YW7FA6RZbxCBv+/tb7S+uXCv2rkLRZBFT3lhzuO5VscPbf+Zb/Uc0
LLdge4kiLnEp5XjZyDmXBf2lqNVfRGNvf+lg9ReR19tf8ln9RfTaeth1altm
Y93WXU1nlrgsugV2659aONhwl+rT4p9BV0SW3745/MmmUGOZZ2L/uL7XRLlr
exbtjYwyfvdPbN6w4GUx39tfBlv9ReT19qftNdP7kyiQ5fs/l4XGGet2PJ/R
98ElEXDcGv//WeNf1LmUJ/laWn9J3Xbj53UtH4pz3vnjtjV/iLPe8f/OGv/i
1pmQk8YRH2NhrYoPRqfhGO98ENk/fT4QjPfd1ngXH3nH+3BrvIvPU14uHDUv
0BjRJmJixQH/it3e8f+RNf4F47uENb7FM+/4bm6Nb5GQ6ZMq1YqFGy//y/00
8/yH4rR3vE+2xrvYszcltPmMKKN7/r8yzQz9V0R2bLVGpO3/fObNOvjLT/+K
1kF9Tn7lF2eMmTrl7B9XHohT+TsGFY9JFmU2jti7NOtLwXrUyFqPxHTveuRj
rUei/rDtBy5XcYrRP72been5S3HTux5FWuuR+O5cyaQ7w32MkadOjZ0z66Wo
5F1/Slnrjxg06lS1h+X9jAsr+++Kuv5cdPOuX+Ot9Usc964/Vaz1R4S+Ov75
/FIBhjl86djrsS/FEu/6Vd1av8RJ7/qTUCl9/RGNvetVJmu9Ekne9aittR6J
kReWVM1yONj4IWLxL2V8XgrWn1vW+iOKB3RZeqF1FiPX7fXNl999Lr73rl/P
rPVLDPGuT1mt9UkM9a5HX1vrkegws2yTjVUije4/p7xc9ddLUc+7Ps2x1ifx
75Y33fwXRhmDYuIGTrj2XORL7l9/w65YY1zHfoeCDr0Uvxw8XzlTaLLo525/
fl+hd6Kfd/82ztq/iZznY8ZMdDtFbJVNG8YcfCvGefeDa6z9oLju3a+ttvZr
4mreDVV+WOZjLItx3G0X+06s9O7/Qqz9n2C/dszar4mp3v3aQ2u/Js4srnXw
77J+xsXOnV8XHftWFB946PCZTb5G/r/aP3NOeCfmeveDDaz9oGD/Ntjav4lB
u8fni8kXYGzp2/vzfZXeiT7e/d8+a/8n8nr3b4et/Zt41fD8qF4jAo2b87ua
n0e8E+e9+78c1v5PtPTu30L2pe/fxM1XJ34pdDzYKDrf/49SQe/EL97933pr
/yeuefdvb6z9m2g/qt+Qt8FZjCbxzXPdyP1OsP9bbO3/BPu7BGt/J7qW/a1X
mVrhRqc1gz9fV/Od+MC731tu7fdEwfxtmk2uFGmYJ5JjSnz3ThT27v+uW/s/
0d673ytm7ffEBS+fFW7xWeLY8pd3Rx93iolbuw48NylZ/O7lw9ZZfJjIPLLW
5TLLPSJ3wMqX232TxfmylUu5svoYu5+cHfTjjGRRoODpV52+8DHan/Kk1M+d
InLl/+PIo10+htFuwuNT/ZJFcPTrVVO6+RhdhgWUmpAzRWw4trXUV7l9jFzB
P+a+sjFFvCo55MX1VR4xvn+/Kfs/ShVlvP5ec8vfE/u9/t63lr8nEpuUaTIh
2s/YUD+H79U0+Zr9N8N89/ga9TrvHX0/Tf616l+Kcqp/KQ6q/p7oV7LQJ+dq
Bhi3L+4rN3V6stjk9Se/tPxJMdnrT663/EmB/3fI8v9E6fD3+4XtDDRGf/Fl
cMcSyeJOseB2Y5oFGvkLTy0/0JUs8CejLX9SLPf6g/9Y/qCIz5sUP/hAsDFu
VK3JF9cki1eqPyk2d3z79Os6af59oxvtPqyaLBxe//FDy38Uk73+YzbLfxT7
vf7hfss/FN12T2ixu3q4MerGx3/cuJ5WP15/cqjlT4pd40SrJj0jjYkTnhTs
WitZ3Pb6k8mWPykeeP3HCZb/KO5+nLAhvnWUEXNm5cMH76WI5iPOep6vijaG
Vjp8YMigZFHC619GzEn3L8UQ7/nDFev8QXzkPX9Ybp0/iGDv+UNP6/xB3I16
UHt3aZeYO9Wv4r0dTvH+jpHz3Decou2j7veWhrjE5+1z/WdMdorctU5M/+IL
l5iXaUfNMZWc4u6iMtVy/eESw7znIx7rfEQs8p6P3LTOR8TRgm8XJrzyiIB3
Dy8ffOAUe5M7neicNh/tjN9xcU5ll8jescHxBo18jD7TJp7vMtUlfv1pn6fP
ax+jzcHEJaHznGLOngq1u6Stv4N6h2d//4lTjHuyZny7pT7G7NjCP5Wr5hKD
49471mywj7F5d42QutNcovTfs8o/aeZj1BzYslLcFZdofPz+ueqlfQy/5luS
++Ryi69vfPjNzDAf40ipyL8Pd3CLqOuhBY5c9ohpWfp+//6vbgHfFmjxbQK+
rZDFt4lsXr7tY4tvE76Nx34yvaqf8fdcv3KxafqK1dGZJmTxM4w7D+Pzv3WK
EX7Ld45M8xcOFjvWtGxTl9jVofQ3Q/5Imz8Hbrgl1rkkf/idxR+KWl7+sIbF
H4pbXv4wwOIPxfde/vCExR+KX7z8XDGLnxP1vfzceIufE/32bH/zok+A4ecp
47tov1MUWuYW/SsHGPOrLO++oKRLXB9dd9pr3wCj5KCok3Pnu0RbL3/4ocUf
ikNe/rC9xR+Ksl7+cIzFH4q9Xr6uocXXidlevi7J4uvEh8XyxFdaEGgs6584
5dO0dWx6u0wB1doFGs/DSvk2Hu4Stb384SiLPxT7vfzhWIs/FLW8/OE4iz8U
a718nad2Ol8nvs/iWLcwLMT48O2JK5d+d4om7TKfSUwb3zPabJ/5Xlr/+NnL
F/pafKGAL9xr8YXimpcvHGbxhaKtl8+rbPF5YtO+fU3qf5LFeHX27I79B51i
0Io+E+PfhBo9wofVudDPJe55+cJpFl8oBnj5wn4WXyje8/J9yyy+T8RtPnCs
w6Rwo371Lx/cueAUO56+9+XdwuFG4NE1O68vcImLXv7whMUfisQyv7a61T3S
OFDgdb2+15wis5cvHGXxhWKqly/82uILxf39Bz/ZNiXKKFUoZWnHm07xkZc/
/MviD8UqL39Y3OIPxZ/fzpg/fl20Ebniy3EdXzkFfOILi08Uk7d/1iC2XIro
cKDO4q693WbLK/2PbjydLOYsL/ne8VNuc8jvbp9a7ZNF/3NLH1aq5TF3fDt6
y2c7kkVZ/9wV8j5ym+eSpxb9OleiaNtu1cYT5Z1m7auBDwf2ThRHq+btfXGs
09zz6vSUM40TRaBRvdKXe51micI+G9usSRXTa46P6F/aad5rPiS6sSNV1Onl
Hth1lNPc1OLcfGNtqqhS5ESTKu+c5vRrzmtflXCIdkuXZ8n6jdOc/6j+iyXj
EuV5Yvmr1XPEPrIx93lXnewUVL+PjV80KBf0JN7GVY/4Bk2KdZtrz9beGjsu
Qb7v8qs3f85Tq3nzB/P7BCs/iQ0rP4nXWuXL+6ql3Cnjq67yyPOkG7lGDvis
vlvi95/OqTV6uo2//GttzLrzbrNek77zP62XJM8Lv+hbNnzTzzb+dvq7MSEP
krTvY6WILvVHzRqe3Snx1SNze12Y6DR/317sxfzLKfJ7VIsfZFv5YlKyrD/0
XZknU7PqN2yc949Xq7PkdEu8Pjnfkl++tOVFp0Qlfb3EZQZ/MKjfgN8SROPi
d/+9v9Fjzv1vSdvFZxJEfM/tzh1jPea88q/zPvFLFCkNvxudabLHLJmrff8v
jiSIGeXvnf22icfs8knCuj0iSVRfOvZNsaoe079w1cp1LiSKRftEtxVp9Xd5
YdOETFmSxNFGxdf828djZm5+tMrFrQnivcvFW3we5zaL5niY5en1BGEsrVeo
fw23efJ0F3e7YwlCvD0e1qOb28wWnrPo+0ackfl+dMMi6zzm3R7hV5JzJIqz
q24er/AkRayKLPN5ixWJ4ufGniYzvkkVfT5o9GJTpkR5Xiy/Z9n/ct1fljpE
iNfehpa9Yr7X3j2WvaKM176Zln3ip+u3njVNs//N2y5NekzyiCBVf1HCq39t
S39x0at/JUt/sbyC36YuKfb58SdTI44ML5bx+2hG7OKg8XPTcJGqJTccShCu
iS22ht9yiIL7j5evtC9BvPozyO+DtPm6bSbf7r3S8iuUULNih4ou4Xhy+9ja
Imnj92buhUu6pOHh3UeWq2Z/Xy1n5+B+NbfZ31ejvAolFx7u4PSIcuO/y5nY
y/5eWq2Z+zsc+cvGp5rv/+PLLgnyPcksU3bXXLHYxr957eN8upHXPvV+XIKo
b9knkjpPODm2nEdUKPd9SMvCTvPayKO9jy3yiOxN96xZMNNpHlkSOX9wDY+o
UzDvoEZvnebgquvWtg/1MfI1ubY9OKfT9Gk/Y1S7ZR6RpfvyyT3S0n8QWG9U
sU4O4Ugd0yzPklRzpNmpytWZqaLp1iVBJ0+mmPdWHCj5S2qq2DLPxzW9kn0f
ZIgVfyvfe/4rYc7MrKscEj/ZOqVwg4r2efW5+c5rdx84zUtjvrnfLKv9/Xfk
H/xYMFe/0ynm5aElrrTo4pTvq6z39s9lVv80H3n773Wr/5pDvf2V81b6q8fq
r3J++aTHtjpjjjvNptVzvx90w/4+Xe2cDUvHdLTx45VXbi9dZn+P7tNC+SM+
3OsUNx8uy3fF32lWcy0o+aRNshh6Ylqvvxq6zMOLx727kJok/PsMLbvyhdO8
ffajzNPS9vF5lleo3T6vy1xfMW+LCu1TxLKBLz/+5gOXWah5vWvDJqWIHNOz
ntrR1mV+/l7LfHnS9uEfHy30w7FyLvPIuaub/gxKFrsj1qx4c9lhjj43rXsl
X7eIXz5qZebEVPPfJd2PXk2bhxv3+bx7OV+Huet6z+GzQtP2HTVG+74r4DBb
/thf1FzlFDfuTjy0dE+qGV7nzLw2j+37U76F58X3z52o3aeS/dl81aJziVNj
U8XkhuMan+nsMcW9BtsyZXKIarsXHVr00G0W2Fm4Rq+lqSJbYkKZ3/u6zWe9
yq/89nyquPO77/wtv7rNbbmN0FGBDrH6swjPnktueR79ddfuPQ/lcJnrvOsP
9U1/OZa7cceDRzwSZ2v/6eM6I+z7VbHF8rjDVjsl3jx8kmuev0viZmcSnPk6
uczxAbsXl+6aSd4PHXigzxf7XvjK8Uz8t/vTc6ei9zrl/ZHclc4ujy3lkrhy
zjODsqbN73uW1Bs7JNZf5sf92j9PVLh09KFD4uiLYxaf6+eUeFO1byKuH02V
+I/Kb54tae8wf1m/PP+37wVIfYg3r/tHxSfXPE55f8bd8e2/z8a7TL+2qYO7
Tc0sy7fey/A35i1pH1rI5ZB42aBV5aPXpkq8pu7VK+PbOMxo3/3GnQmBsjzi
2X+dMnpgm81O+77QnZ4TCrdwmXkXv2tj3gyU5fn3KLdsatVAeV+M+667W6Ss
Xd7XxqX7b1xUs7xT4r8HbMxZcHmqvP8zoUWj2OwPnRInbmibLXKFy2w39EX2
8EshsrySQfU+7tU8WJbHe9x3fF2rz4+x8Q2/I2MK9HZKfKt94qvUWanmd++9
yfM0RxZpL/H4e3/sdmRwuMts8mZ99k4Ts8jybi8uU7T5z6GyPN77PtLz0cEf
J9i4y5ly+8r2TZXvcf4y5kvz7luPxNO6/vP7LsMj7zPFLdvx4GRRlzli+VGz
T1S4zJ/0J16NmhI1wCHvizV5VrVVn6oueR83z/02PbtUd8j7WsULrC+zKa19
Dq/Z9PReqWipP+8BrN9gPmj1MtV+T7fq30vWznOZ/5beNORurhjtfe5o48/R
sz6aPjfVnPTzu9atntpy7rOeOZf48b1mqTJ+LUu/oVvrD0yV+6v/Mn8a1jRX
qpxf+7++GHK4epLEVzq0+TnkSILZPPBk9IYeDnm/mfl+7hDfO1c+S5L44exs
LwempQfX9t0YfHCpfV9vWIUHxwp9nizxy/WDzj92Jct4nM5timf/tlqSxI33
diq59raN31aq8PuuYwkSfxzy9w+9p9j3/0q0GZna7Cv7e5hFdtWZ0itnitk6
vHrd3Nns72EyPs+7r7xI2mF/77L5sq2FfmiRbB4u6Xr67Lb9vUv6e90Bvvm+
f2V/37J8kSuXi/RPNlPXPggovTNUe+8w1Mges7raztuJ5r3QC2t/TArX3geI
NEoX+aPl6unJsv3HP/8/sr48nqrufds8z5KSSqVkqBRJk3uToqKB0iyZmqVR
USoNSko0CT1NSpExzVilUVESiqJCIkI4nHGf9/xaa+/zPs/3z/uznW3vtdZe
97Wu6x7GG4zs38vOf56tX+FiEx6qSHg7zUdL2q+SyScZi/Nx0LuVccFp4X3Y
68z8G7d4vDlSKc2n/Jl/dKvAtJud34sqD8MjMv6w+7vBiqtefdZwWHwQffz1
sH7R0v6VHRUaQarh3cjDYyplq0T/T//Kwzoz89w+d6Hy4uGplloybP4yM19f
1ZQnO07oYm23o+FDcsZ1svOVVkurt67oZudnZ4pd0cDh3ex+qBDm9IK272Lt
s4pttUomnez8RX4dlHRbrZudr6IPVyZP0Olm5+vcieAPDZbd7Pe9kft6cuvC
bqT7KK42IU7aj5KZD3dZPfgGndLx869e+mpMG/qj4KUUtbiXrSfGjOeyS9u9
Z1n8Ru1FtlsvnOSw/SajcoaYFUjO8YzdaSh5bicB+3vmezHvl5HtsrKVHc+k
ZS4RaYI21NLfatHAOnm2HrXcM8tdjmFybD4o4588Txi1dzu3sOOXkB/+1XVz
GztezSttTo9c3sqOV2uq6fiZJe0oJN4sZMUAlf/pXzl57/cDfy62sfvzgmUD
EywPt7D7X9zk0CE5Nq3set7uEBnm1r8dGRI9wQHrCUjWzKKPzBIeW/9u2Sqb
Js19vWx9Nc7HEWltkdJ6a8x4NlTc1zr7rJ5df/Lax/x3/ZL2p9SZtznObYS0
vnYGTOcfqZL2o1T3VHgw6nQjGnCM3pqe8L/9KPucdakcXlCP3r/jf3O7Ie03
eblyecaVZ8pURMmG8lFpX1Eg0QcvYX2QHR+X1A2q9g0/kB/RC3lYL0SMXpiF
9UJ2vel5L1lzMKMB6RM9bDjWw9jv9cs1HX+t5fXozrYR9p5reWw9QL0ThYtS
lASsnVF/cucnvV42f3bh92Vxa+tF/6kfKIRsVIiqW0uk9dVxPqpkP1+7+7C8
PFtvjlkve57eGX79UzWqzFPPENPSfpRiRe7aH88U2HxbZj0tnzgidkdsKXo+
3PjM6jRpv0pGH32I9VF0fjPfIGKKLvt75vuSdSh4flSjBFFlM0av6JLWp4te
YDhn7Utp/0o2f6/b8tHy2HvIP3CAQ7OdCls/IjI636fmsRprM3r0DKxHo3vF
U3YJTjP1zh7n7V/QqDdviA5rM+P5736UQnB78nf8QE0Jvz9znXn/M/j9gXke
pv4Kg5+O1I3I+hz6gc03fJQ/+7KJ4BkcIs/7336ZZ2PG5Jh2VMCPxRlfZVdJ
6+ENHXRe8G7y/9a7uzT17/hBLlkvTH06DbJeGDuAfG9MvrGYfG+MzXxvAfh7
Y/Mz2849D/gTXgN+ZH0x97Mk8SrbcLwKm6+ZOGDL6GmLvsISsr7+3R9TjuqP
vzeoJevrv/X3DG949jEo/gIfyXpirjPjeWu3Z8Yp/jd2PGXoX5wp97+y47do
7/q0prl1bH/Mo19CrGrMGth8zarv6WN8vn+BHNuRz7JqdNj7t3y+5tgyRud/
+l/mq9+1m+hcx9YHKcffJ5vvaqTos2MXtwmUyP7G1BvhEf/A5GMz47sU+wfo
Jvs/c51Zb1p4/2fHM5ezK9O7ugnMyf7F3N+W7P/M75nx3Y73fzb/9VHHsy7F
+J/wg+xvzO+Z9fsZ+wN2/FXirEedKW5ix5PC+z2bT9zda5U+0K6JrYdzH+//
7Pjq5066unp5E5v/euTlnMigxiZw2zgn4fgC/f/phxkFO/l1l1rY8fzyKmzu
ymHS/pYpGJ9AHfGnTL0iZn1qnlUOLlPsABfiX//bz9JGaXvDusIOeEvwCFN/
h8WPGH+wdhnGJ2x+cc6dgVtslTpgkBH2v8z9mfG9kjTa+/mFDnY8L2I8wtoq
GK+ALfGvzO+Z9TvqrX3xcn1pf0tlZ5+94+93sPnGhvOSx42w7GC/d1OMR9h8
4qu4vgPcS7L445zbh70/M55jLm0d4+rJYcezHON51t6C8T47nvFO2f+cXsCB
YQTfMfXAjhD8z+TLM+u1C+N91p6H8T5rJ+DzATsf3VtH+d3Nk/bD5E34sDfy
GIcd/3aM76Xzg/E9a/vj8wFre+DzATtfZSrmSx0dpf0xO57VpMwbKe2H+U7h
nUqJrbT/pZK/y1t7f2n/S3ffYY90szkgm4bx/L/rSatTfTCeZ9f794l7nvy+
1A2dDzF+/G+/S+tfz/bNGMRh5y8E43swIvG2ITjelp2vN3G530cf4MHHj2ic
2FfaH7NpzCm+zFQuzHDtv7z/Ux5YL9q6l3eTCyc28b7pWvPZ+Tu2r7GzbIm0
f6Yrzg8AU5KPwvDBzPzEGnwNXLOAz9rXMtbZ2r2V2g9demQVXKV//wLnr7B2
mn2+3xwTofR+93zWdB2V5vPH7RnYnhHLY225L4+yikz47HyprRgxsvYxD/TJ
+Yx5X2Y/S8P8C2vfwvwLa2di/oa1VTF/w87/2RdCg52S8WRse15l/sgZfPb7
vIz5FtZOxXwLa5/G/Ay7ft507Jx/bwaPtQdl1mzIsuTDF3JeZJ6f4VuY8Wb8
113Mp7D2fcy/sPZwzL+w69Pgru7kJ2IeTCd8CnM/Zn/+gPkS1i7F/Aprl2B+
hV3fZl2PIxRyefCU8CXM/Zj1vQrzI6xdjPkTdj9Sr1D2eerAgyvkPMu87xPC
jzD3Y/xDCuZH2O9lRMzxo/4ufNa/DsP8CPu9HOka0i/mqbTf6gvMh0AxOf/+
t9/qa8x/wAASr56E49VBzmWxSmK+PiW8/u6X1yQRRJL8gyacf8DWu/sa9JcP
Yb+/PjPSLgX9FrG24+6a3FxzGnpIPiCjpyUWKp9yc+CCialJ/wwvGu7rNO96
tIYLU7fIygzcT0v22dc+Fqe4sORxXeOxNMm5+Vaay/l8LmzXelbCr6ChYpym
Quk7Lui5xNbffEvD/BMDNhxM4MKZlogwjryY/X7dfzdmyhaLWDusp+zlCi2a
tUm+EWuTfCP2e1w4qefC0Z9i1r4VO8U38YjUlmuOGJFuLu0/+3Hm0LUFeSLW
zv9jPjNDg2bta+fHmv+zXGofd5yoeuIWDQcIX/vffrWqhxaXa94Ts3bKQN2Z
W32k9vS7RfmfVMVQQfhZ5vfqhC9lbG3CZzI2831YmjsP0Z1Fw3TCPzLXZxB+
kLGj2q+fFvdI6x0z6/Ms5v/Y9XoQ83+wOGB74GeRNvv3DF/H3G9HvrzzFm1d
9vpPws+xz0/888HlFz9tD6HhCOHnmOviptXB787z4OYpvQGhzkKk3Vxe1jKX
Bw9O7d1zli9A7paB2VtNaPgQHT6hwl6I6s09w7Y+FcHaY+tlKz4LUM6l5vet
HTLUpOvX+ZrxQhRUIzwwBslQT6z2nT0iEKJJdRlaBr0y1JBNKq/KJdct5g8M
PjhGsv+6/4i6rSpCzwINTNpVDCiTzRuz5l4UohF6Pafl5A2onLcTN5zcKESr
kpNia89zYWx8lU9ZZS8SmV+Wf/RaCEssc+cnRHHRncAVbzmmknWiq7Lr0rte
5GKSdkP/oQz1e0XsyJCtXBTOfVlED5elDnnc6L/Sn4v8J2Y+EVfJUPPLd6iu
Ku5FQiv1KsuHbL4uxeixZlhvBrdX+ybONpP4ybx8FfCnkaL31StoTi98mP9t
8+1jNDoW218jp6IHlhzy+nxNj0ZFWhq3x4l74JzczIgRU6T5dqttjoR+qhb9
f/1BGmRyjaTXteeXbhyyTHp9ipNVtzBBxJ6f9Vd4WDesk/YDDPtjnnj6hlQP
abw3I91lh+T/E30wDuuBSIXog4zN7DfdV52Gtu6h0ZSEIcrGH6T1MCcNfpFY
+ZULlsvPxOhnCmHd/sEFawfzYFlBW/b1NiHEcMaq3ZjHhX3jZOmGwULwHVkq
Fy/ZLzwDLvaUrxWyeO4r1udZexjW51k7EOvzsIfo74w+GUj0ecaeQdbD6Hd/
1wNb37f77f35z0aLWH0HZP1FE9dL7Wgb7ZuZKVK7KuDhguENUnt4fIBMogmN
XssUVslp9EJF471nDRvFsIbo53ZYPwfH3oAlJwy5cD3C/kTLYTH7/Mdrklv6
zhODdsioIdY50v7Nb8tVj2mulNr57ah6mr0BVbJZY/EQSxpRSTpxLmBArTr6
6qbdARrFmBU4mmzvgd/gfNVe0Av3FhoOyo7pgR+xvvvsfvVC4+YFbvo2kvNc
QOwA5WAu+JDvwQp/D1BD9EWmvjrzfC5Yn4QZRI9k4jMYvZKxXYi+zDzveKI/
M/YT8vz5+PnBiTz/Gvz8kJkQM3LFtB7QvW0Qtb1IDDmbe200p/TAK6uO6bFp
TH1zyT57WqPq5nQRWx9yRti2m/LHpPYW3y+7VpRK7UsznWfdM6CRWsSF76Wf
hGy+KfN9qA3cVyhW5iH+kSc6IW+FkOx9/3hwGg8NaJ0WsekdH5Y8moAcnvYi
f+OmTr9QCQ7pY1paHNvLxltsN7aZzc/gotYNFst0JHh2zqGsvJFPeegEmY8O
PB+ImY9mPB9I753mU4/HQljzrurubDMRunVkTHjtbiG8NbgvQOtEyOrS62tr
n0vGfYRVQfsIEQo7HHGXKxbCGY2Gt+GrRGjLp3W7n4ULIdq7+PSsb0J0NK+4
bpgODUuyVHMM3UVIc5PgYJUiDfee6DgsUhKhxnzzX1n3RVC7pe7TXk8RcpN3
V3j/WgAUZczVTBCjj4puKS6PBPDb4vGA5nlipJuVOil/twBu71t1ZGuMGI0L
994rM0qWSn6TNbnUXYzejX/74xlXhqqZdFJlyQ8abbN4abZniizlcs/2u8R/
ob3GoZ/e9Jelxn14u3dbDI2Oao06aiTZv43b1wz6WE6jU7ZJs4JbZSi1q1GJ
lr+k/aYNn8wOb1wvtROyq/Micml2PttXPVeeVStmbWvuNqs9SWIUdN2i/49S
CQ5ynHtI7qYYxXT9Wn9D4vdu7nI7OPqKGJ0bfW5XlJwYsnO5sTr+YrT31slv
HeYy1Fs375MVJ8Vo7SH+tggzGarvppuibXPFyGN85gwbBYk/16aW6p8VI1e/
304Fkn2m3yILvRwdGvlHjMntKyOGjrLhlx0W0ujc1YUicyfJd5otXmSpTyOP
Z66znprx2XrBGb/uXDnsx4MXwYaPNJ7z2P1jwJI/44INpPbQUDPTumQe2p13
euufzTyoLTeqUOXy2Xrv9Wc+Ww7ZxGfX79a2xls7O8Ws/ea9c92fDDH6FC9K
jZf4W1sLm1UWkudNR15HD+SK4Pn0+5dV+9IoaePl5vWdIsjtkpPr9KTR9WlD
9w89IITAvVrHLqWLkY5exMfb8iLIy7OK8Jbcj6e5+nJ5geQ8dV/Xbe9aMRp+
61feaIk/DKi1i6tP46PwGtnfc1VkKW2VUeOGmfBR6ekQ3YN9xPDLqMpcbUcv
4jjVx35NEEOX3aOFCfLSegPz5hr7Zx3rRXuPlj9clil5nxdXM+LDeSglR3Xx
yIE0JLZ/mh3QykNLdUPl51rToJRnmsGr5rLz3/3cYULMFandLMxcY2cv7Reb
Put53sdQab780yNa63o6pf2macFt2YOWfPb3G+a/fHkwS8Dac68sV77hIEAf
lCr+jFUWQ9G05B9BlXykP2FjQL6FDHWhcCz3zl0+WhHQ9b67U4Jvrr/zNizl
sfpKUI52ET9AGg+W2ORYQ12hUXx2QOaCPzw2XojB/57UX/4IXSP8B6NfsPo2
5gtZ/cIS84OsPncF84OI4f8Y/YE5nzzH/B9i+CtGH2Duvxzzu+z9t2D+FuUS
fpHhw78QPvff9Y4l5zKsX7D8ouDXX70O1En9gf/2lxZ3Lfid6CW1A3A9AnhJ
9D/mfMTcrwTrv7C2sWXMcz4fxlePFN+fwAcrEi/ExfFC7HlHI+yP/abbfGhQ
EDouOMNj/duKrP3DkB4PHr1SPvQxng+/SXxJNI4vAScSXzIBx5eA0ZIhBhM+
8EHrbIfKtis0DJw181uYsgB0IvuV36+kwXji74KSYQLQ3pGXo9ZFAzO/DP4o
1l7tK7uTB/7CZW/VZouhcqvMiMFTebA8vlDt9yExFEwSvc2pEoKJ5wHrNytp
lPs1b/3uViFozZ+7KHcwjabuWt2vOFUIh+4lp/qvolHQ5sKVm337UA1DggcP
7RCik3ozp3yL/99+18Vnx2ctnSVCwafqE0Z39UBXt8DkpLoIYgjeXIbxJpQQ
vHke402YS/DqQIxXQZng1QqMV8Hrc7tGoYq0XsyE0WlDudz/7Y/97XnKns+v
aOB5jz6WktwD++FBW49kn8yO8asKru6BIq2Dl0ZpSvtdWz19uHJLkhj2CL7d
1Tos7f+ge95QdZSmDLXnzqzo45LxuTynoUZmuAz1iv7m6OdLI4U7rQ3akuc4
8ebP3P39pPhWY2fczvu+0n7X0aueZi9tk9pmWvPUM9Ok/a/V3xl/rbPgIU89
rv3rYTzYPKhPVGATD80f63/2rCIPjsss/hDA46GDcjWtwy1oaDTym+OQJUbT
/vzIM24Sgb7/pnj7jWJ0+Mej8IprIijddL5yb6bE36TZ/hHqy1A+m9qn6WVI
9yfLplHHvX5x0dnRxUarr4ogI3eUzW8FaX3/YIwv2O/Dfrf/luytPEgm8aLM
+Yu5nobjQeE/8aCsfR3Hk7L2EBxPCox/KsT+CUwJ/vHG+Ae8CP5Zh/EPi5/7
Yf8FI24tS582jQ91fSu89/7mwbE4hZmJcRK8//P8P7Xqkn1R2Wu9YwAPtD7O
vKGzhIaAiRUaObE8uKxSNHP/IRo2fvAzPm7Pg5Qri5Yst6JhFIlPjsbxycDE
Jzvi+GRg4pEX4Xhk+A8+Z+1jGL9DcPCcg/2n8sEvfeBOL8n5f91ht/2XN0j2
gacDttdOpiEyz3l47XE+3Jgbrj56PA12qm77jgEf+HIhWfsO0Ox+omRaXhBs
xIXNxL8z/SJG/rBurPLnQ/zsz1+8UriwZKn2E9sIPtQ8MnM5KznXML8Pb71m
0tgoBCb+l8HPsgt++le4Svap4fcikiV+PDh6g/wgPz70n2CY8UpTBO9tpkaW
Sfap0NqfY/dMY/qFS/a37rtvdCIE7Po11c1xutgrrd/y+k2K3u91YuSYGnp1
1wcR/Lu+tgj6LrTaJKyQ2ju33X8fwuOz9u+HM1QmrpPeT8dX9126Dx9dXvhq
eIYEDzH9ZJjzYzGu7wKFIxcZ0g0cdr9ln+/MKe6xZjFrX98ZCrKxYqDdcH7H
M5zfgaaQ/A5XnN+BdpP8jtc4vwM9JPkdc3B+B/qx49Ypd0qe8pi7OV0YL0Rm
Gy3upOyTpz5O3tiR1V+E1vjdqJR9Ik8tHrnWJkByHrZLKC+d8keO4px5YvaZ
L0BBJH9DFedvoGEkf+Mizt9AVSR/wxbnb6CPeeeWpaUqUvpxd/pt+izB3/36
T7gmUKR2zLz/znePCCUs/XL1orsiFV/icHPRECFi8jOu4PwMxORntOP8DOTy
fpBH0TAVyflu7PdVk0VIVW/w4OipytT8rrFhP4MEKGLUZmWDfGXK2aJyNm+j
EDH5GBNwPgZyJ/kYp3A+Bno69R/NcHM16qrsPzYRuUIUXDbLZv0/apTQojd8
+T+S80BPjtnz06pU09aXq3WOCVAOyb9ow/kXaCfJv/DD+RcoesOPFVOjNCjd
vgmZ9+qFyLBSXSb+mzpl1tzYteGkAGmRfIvFON8C3Sb5Fto43wIpmtgNVKjT
or7a3FQVyojQnSCPD5lGWpTD++/bPbcI0H/yL1DY3drER+d1qMSDw43O64pQ
A8m3GIPzLVBsl4MdeqpLlY7ps9Jbcn66S/IrtHB+BSoY/Xm1mliP8v7QKeMU
IUL0DMyfaqb85U/RLZJ/Vonzz5Cq5eqJnyXv1zhT3SnVg4v2oufie+/VqbIt
r976fetBjSQ/TB7nh6EJdW+FPmt1qRmXnyxIsuxFV0h+6QacX4o4sq1v9ST7
9OVbZ3flD+xGFSRf9BbOF0XViloXF9jKUv1Mr1x80taFTl9ZuDGpSIY6vmLs
lPn9u9B2kt+Zi/M7UXtHfdi3BkWKv9pcx8WyGxXU2KhZ+EvWl2ORVbV5F2Ly
je1xvjGaTPKJU3A+MSorfe7jhYSwvuzcwZqoVnSA5AtfwPnCKKvea9WyafKU
IGHQ3V2lv5EWyQ/Ow/nByPasm0fsM0WqsKzUGmW1IQWrk9UKwxUpOYuv84+P
a0U7SP7vLZz/i1Za3M2+vkyN+kqPMu542oZ28/bsPnpMlZo/2d0l7EALmkTy
ww3u/M0PR4lPihS0ZHgguH2x2E3jB1pN8rkX4XxuFGN8PDWtWZlKfHlULC9s
QEz+vCnOn0dJHY/u+87nwQZxQeXLPlVoskLo/lhVLvx0v8eL4HxATD59I86n
R1zdsw0RkvPMbJ/armH7ytH1YI5Am1amosPUlhze9wpSSf2Galy/AcZG63Cm
7+UBV1zU1k+7BgJ7xea6m7kQZ35Ys+fqNzhD6jNY4foMkELiba7ieBvIeTZ9
fxJXmeI8mX1a/k4thO85c1hoo0Px5w1Di8fUwWJSTyMO19OAidqtB64c5IFt
dNmVgMs/YZKy2nyDNVwYl3RWZV91M2wm9TR243oaUFPWOfrxJhHYnGs+k9fe
BM6kfsYAXD8DBMmOn5/dk6PiSnT7z5nYAraknkYcrqcBF+r6lNS9V6TmrW1O
WMP5CZ9JvYwLuF4GtJJ6KTdwvRRQOly601Bflrptuv69bGMHrEGr3gUGyVDt
2a6mfmM64Tqpf1KG65+A2YJBfWLzFKmHRt31l+51wCL9lPVT1RWppUl1tq5G
ndBnjPrR8kW6VEz+5qdm0AnbSH2eDFyfB24axhv9buJC17vvB/gnOWBD6vPM
xPV54Aqpz3Mf1+eB0Ic7mzOOiGDGjlNV+w9wYNu46OuZYUJwo/ca7z/ZA0NI
fZ7xuD4PKJD6PAJcnwe8Vp/iHQuSpezTQrpXPemG/Z9er30ikKG+v1Lp03ud
AyLt02bXT8hQv5bsiB+1vweY+jYquL4NuBWt+VMYpEHRC248WpXEgZOkXo0e
rlcDK94ecC8t0qVijw6p3K/KgSbfKs+iOUIYOq7kZLwTD4aPCTu/NE8IK+mg
SvMsHqwUGH9tMRfB+dc6xo8G8uHa42Wf+tnTAA+ctFcFStaJ1nxhxhkRZK13
b3mtwgfnNU5OsjwhXNJdfm3nNT7UV79o7+sjwRkXP/b6OgiAqUdVj+tRweYx
xd2CSHlqZrqFS5/bPFjVd/fb01PkqTVfX5+qk/jv9QXKkVd75aiFMbeHPpec
g0ICT0FOjhzlAEnZKSsEsIzUozqE61HBEFKPSgfXo4JisaNtQ5si9WDh+9bo
EMn7nc1+8Py8IqVo3vm9aAgfHjbm5BTPUqS+RLa3P0J8eNaP++KWSIF6NSzg
pWCJAJh6VXK4XhWM3F3X3uuhQpleH5qQ4ciDOWM1gpb/UZb4+3cXfijwYaJC
ZuWGM8qU7Nmjxc/y+DCX1K8yxfWrIETnnOrxOWqSzWP2sZIvPLDrsyHWoF5y
nkaXw/Ik58VYUq/qIK5XBVvGuUUsvq9BfXyztWBvIg/6Wd7qiZmkQUVV367Q
OceH5niPmtnjtCktV55V3UQenOi1+zzwohb1LMp6rIOP5Hn+Xb8KLu6BsVlH
dajo4nEucmp8GG3z5eO9STqUew+6VT9dAEmh6NzY1UIQxk3nzfwtAte7Zho7
rgjhxtv0jSdG0tD9J2bfwxohLFDrW1fmR8OlUdxuup8IZGaEexlepOHXixyv
1ZJzm4lwz51lxRI8nHG2qMOEBtc+CU5l2jQknQ2dElojgk1Wd9+5etKwLdw7
Uz5BBOecy5ajszQs24K6XrgIIXve5n7CJjHc/jEpzPCyEJbUcE6mxYhBfcld
uTV8yXpaF6q6zE4MwaS+Hh/X14NwUl+vL66vB4mjxw4uypSnBnA7+z7liMA/
RWvoasl6O6pkrxs5g4bRJq2miivlKU6fPeqzz0nOizNsDYZXyFG+L1st1NPE
sNr8QMRWTXnqkNzceUGTxNCH1NMbiOvpwXFST08H19ODKYVvTVJ5ipS4/yz7
Wd0iMFLdvlzztSI1LVr0+IDkfXvmDogPTlCkouismfk5NGjMLh0dY6FI+ai4
GO+LE4NrSb1+9jpFqlHexGOKnhgU/11PDxaSenq7cT092BlY/nmnmwqVZvS+
kfNNBHx1zbDhfVSolHcrbyTNp2F39nSjss8S/Hewbe20Qhr6x6VMKd6uTK17
ajF87gkxHOvdp9RUoEwd5IbEGgppGEjq6TXienqgQurp5eN6enDwsIrZ4k1q
1J1hgm37RtFgOYiT12eUGrWme8hMZcn7nNCosO65qUolG/qucr4vhqhDaeJ+
tCqVNvzOU1pbDMNJfb0PuL4eZDsN3P/yuwa1t9vvx69qEXTGLhivfkayfy3k
7PbbRsN8TrKll4kG5Riz4GTJCjFMI/X2WnC9PQiZd8us1ECb6j/0U95QRRqe
juVMf5GvRe1bOWOf3R0acrx2LTUw0aKuGjgsiu8QQ2krfOmK1aJWN2d5ftYQ
g+fMq/LvDfpQswtbY64OpeE80aMHYz0a3SF69GSsR6P3RI9ehPVo1Er06C1Y
j0ZzNuufdwjnwvwdgYo3BSKUS/UsiXrWC7+uH3BecYdGldWyz5dm9sDyKUaz
814K0aQjew5sbu+Bx81nVD8oi9DBKvvJb5cKoOdZhkNpNI3GrYiZkaknAFfH
xTbt5TTiKSj5mZcKIDkzS7M8lEZve74vG6gohF2Xo5VeZdKo8epvjpWNAGLn
xF/6WCNC6Qv5y+1XC2CxzDXlel0abVdWfjYtUQAmOdlBbdNpNEk+JjHYWfLd
DzAQHXktRHqLNhvOOiaAbZt6d/pK8O+2VVUqiWsEUJDabLZ5qQidGfNx88NB
kr//0lIwP1mENA5/iruLBDDi8K8LC+VFiDPtVNA7Fy546xY2HpKcH4ccXlBu
u4QLyxe66iq4i6C+MTnT/xAXBt2Nb7XZJYLrLpyo09lc+N63+aXfNRGcchKh
TQ97oUT3j9AhQwh7R+TojOvqhYeca+6yP4WwQW31qm5LLqRULf3n6WAR2z9+
Dc6ngi+OOSezMzhsf8wNJgtNTVuk9ZFNrngc6TtBms/L5HtVONpr/34ktXXT
fh2baC7NN0z4dCju0hzJ8665U/KAx4Gs1ouRicvEaHz+lB0nh0j8eny/r89s
xEjsMvHN5IAemGo4SkV9iRhpHpsSpNXLgVlLrdNqftHIa1Hckw8mPXB6xGH6
Sh8xukHudwvfDyaQ+w3E9wNd8nt3/HtYQn5/Bv8eFFzx/6Pw/4P/5LdR/8lv
ow5knPoVJxTDkz2RZr6S88oUQ8dV21VkqNoRH+LWOUvGPuDGwpLXYmhsvyWO
jJKcdwteuvwaJ8EfH58/39cuRPmm6wsmjxHAeetfZ/uP4KPMl2tGTS8XwHjz
/bevt/JQx4jAgVEbBLDjSPjVloPS/rj/PF/Zp3KOEKWtXbgudQbTz0Ri+2yM
2rqPy9psPVYcr8Hau3G8Bqs39GgHH1ZYLETdoSc8d0r8EfN75vq5FZGl4ng+
ekP4ACZ/MfRDGLX5Qw+rx7H5262f0sV7pPVgT+L4L3Rn849XK7zF/+lvL4ai
BQUd/iU81s46VpF2c770elJha2BbBR+tI/+P4ZNZvhH/P/CE7eXlt2Qp45wh
RpE5YlRtljjm4ndZSut7hV+nqxj56jyJWttXjhJrR6Wv+Eojgf2a5JjjctRl
47CuoudilLROW10QKMFTe4seX9opRlOS7m4OpOSoYfWGJ0IsxehLyYpP7/vL
Uf4zApfNqaVRgXlGzYmjstRIWinwVb4I2c4wf3n6viylP0FkXz6ARqm+yVkJ
P2UpmeAu9W+7aDRk7+CES5L///tGc23LRxo9JPXrT+D69ciS1K/fjOvXowuk
fr0Xrl+PzhP/OxT7X+RL/G8M9r9oFPG/fOx/kYD4X2/sf9Fa4n8jsP9Ft5IF
G1eny1Jb3i3uXpAnQLbzMyMrO2WpiJGPzWxchGh40gWzowpyVOOHyO+8B0Kk
2lyivqBKlho8yay/v44ItYyn2wdlyFJLL72Y9zZQhC5H7pJbul2OahO+s1z8
SYDmdthayk2Uo05ZLqlWni9EFTWNs3RkFKgpBaXzl/wjRn5hejyrKQrUkAO7
OINHiJGqXJ3l13cKVELAl5rB98XIQq5zx4trCtTnAOHWNj8xmi0nV5gepkAZ
Bxqr5WuLUfjxmml3aHnq4O4PmsUGNNpcli5MmaxArVXatjc7hkZMvf99uN4/
yvp3vX+USOr9W+F6/2gSwRvyRn/xBupH8IYLxhuIQ/DGcYw3kCbBGysw3kCz
CN5owHgDwb3nrq5t8tTWtKWHStIEaKDGg017ZipQ1gsdP0zwFSJ+jv+DflMV
KJ/2Y3XDPgtR/K7Q2ivqCpSpr0+8toMITaBOyo+qlqd+lNvOEVwSobPOu+P1
7itQI4uXm1r/EKC7tabf4rYqUM3n1M+MCRKixIPX/mzwUKIqHvwY2XxMjPy/
Dqj5cFaJclbgzR8gL0aLOHfCvhoqU7rynYs/3hGjZxGvto9pUqJaBhq6h3iJ
kY3O50177ytRr+ynOBr2Svz18la9ETOVqJL33pH+/WhUCsN/559WohTiSyef
lvhHpj+COu6PgP7THwFlkv4I43B/BLSL4KubGF8hAcFX1zC+QnsIvrqE8RVi
8NVajK9QFMFXkRhfoR8mBYVxs5SoxPEPFvQvEyCj31+SDS4rUTOejbLeek2I
emdP2KKyWomKVtp15nh/ESpPjQWBlRL13vUZP+W4CJXm9/14eooy9Wnowzfb
ggSobUztde3fStQFB0urvZpCVJxs93TmKRXqTOHC1J1JYpTs3u/2je8q1M/g
uNcPxTQqtIhXuBKkSj01NZ2h/17ir0aW2MVPUKWmDDmRKvYVo8lmcmtPyKhS
dwZytVq7abR+4bny0wdUqL6hQxu5fBHKOrTzVG6tCnWxusHPPptG3aR/xFnc
PwLl/Lt/BAoi/SOicP8IFEnwYw7Gj2gUwY8BGD+i4wQ/Xsf4ER0h+DET40c0
Jjj2D5WlQmkcKzlupS5E3t16AYGlKtQ32rPcqEqIrg0OOGkfrULNv5G5Z8cq
EZp0MNjLaY8qZfY1/o/vXgHKWNt2eKOJKuXY58JJjYlC5E/6WXjgfhbIkfSz
0MD9LFAOwaf7MD5F3QSfCjA+RfMIPp2G8SnaUhlcdU9HnQrS4tu/l9w/1SSg
fa2cOrWh3bFhuQTftce2nhTmqFF1GjaXJ1wXoSlucp/ln6tTrvHKmuYRArS9
ifPRdYk6VbnSRP/iEiGaSvppfMX9NNAf0k/DFffTQDsJ/jXE+BcVEfy7HeNf
lEnwbyrGv+gVwb8hGP8i5UU7K676aVJbX+zQ8HEXopt2Py4MmKRJxWmUpzlZ
iNDXcx2D9Qy1qBGz8lMWBgvQy9CgmLBETWrxwSevIlYL0blR2TO3RGtTG6IN
1eVXiVG0tWu/6pE6lNLdFdbLv4nR98HlffOE2tRZmx/C9XZi9LR7nNy8vdrU
kporH05NppHvptTzJ1K0KcUM1+BWJyFacOGNYH2INuVz5HyfFkcRMqO2v0xq
1KYeOc3Yc9RPglce545UF+hQ78dMNFEwEaPgVf3XPnfVpYKsdeY+LhGjvMiQ
vRaGutQ/RUduLFAWo/6R10/qcnUo/ZfOvzuiaOSwf1G6ZbsO1ecYKrEdJEQj
C4520591qBj9JG8dTxFKecktzx6gS8X9/vrFeYEQ7akyuusaqEfteXnA+2C2
GLXXx4wyUNGjcou1UmPbBchj3Zy8Ir4upXprgP/odSIU8fx7yGMnPWoOvN3u
OUuIbvw4Gt8Uok8pZaY/fRggRkz/kwG4/wlaRM4fDvj8gbZlPS48Yq1PXb8D
1X3FAjRvd5/ki7r6lF36mebBl0Vo8tWirm0r9aljuk9SX68Vop/x5j6HfshS
pXdG1H7J4KPbPW+Ae0WWmsD/PqjXRoAUHXM0P3jKUbH1uy8rP+ajlV937U28
LEdNN9E4FL9Mcv/O/gXN+RI8MMNNbvxpHhLUKxYPUpajws1NB12U4LtI0o9H
MflvPx7UQ/rx1OF+PGgL4W9mY/4G+RD+JhjzN4jhb5Zh/gYx/I0T5m+Qk+u0
B0ddFCi4dGjewD18dNrAwlNTLE8lKt437qslQDss9pi+PahAzd24LzU3ho8a
6Qf77X9K/FFfvv/RBQIkkpmvt2yEArXCaOTht2U8NIH0B6JwfyD0jvA/dzD/
g8wI/6OA+R+U92/+B734N/+DWlNDc6+eV6J0TG+Gj1vPR99UBxQJZyhRIwLX
LNynI/ketPRiHz9VoopbDVfOC+Oj6/URh5XmKVHHzvJmfjnFQ63/7k+ERhD+
yArzR4jhj75g/ggx/JEi5o9Q5TlqjXWLCuVzKnOy71I+snZbO/H0MRXqloX3
+YT+AsQf1PFKR1aV0n7mmJrix0d/xt6/OHiHCkU3v1/03J2HGkg/JE/cDwlt
IvxTPuaf0BjCP03F/BPas9hjkWGlGmW7bFBETV8BckscveLmWHXq5FarjJhx
fKRN+ikdwv2U0AbCTzVhfgoZEH7qLOankPnx5ldldurUvXFLuvK7elHIwx8e
H5+oURlbMrj2PVw0SH9D0uISdcrnyeUAu689aNY/52NUnNQp1bQZeys5vUhf
w/t2tKUmZTX1fNtkmo9Wz8n2fequSV05efF06Cce2k/6OU3H/ZxQL+HDelz+
8mHoKOHDSjEfht611yjdPK5NfSqw3OBWzEeqwpSIGBMdqjJh1p0mKwFaNjNW
qc5dmwqcWnIvaIbkfED4shjMl6ExhC+bjfkyNG9K62Z/kQ61tOdV5cKDfLR9
R2NKzUhdymdyzvBPj/iopX2N4dI6HWql/PGMpSlcFKq4qemZZL8amr5tXaZm
L/JU6tu8wVSPyh5bq1hsyEcyLwT+0cN6QEtkm2Kn2YPOWCxoDL7eAwGDYu/4
13NQHekPZoL7g6Fcwk+3Yn4ajXrQL/3rET4oeqYesJrUg2I5vHVpcwQw9VKy
gRePg9Ann0u5YgGsP6A+e2VqD/oS4ph8ZC8fjgxtnWNjwUErH3VYrq4RwS5H
D+ffDj2S+cJ8tjvms9EBwmc7Yj4bKdfGu8z1EsPckDxNJTEHfcmAALpMDP46
i1tWtnBQ4Crada6DDLXA1KCfzJkeZHzANKjQRAzJDVO6h02U/D/Sz+w27meG
lhD+ezzmv1Ek4b+rMf+NZHQw//0T89/IqDdDuOwGDTq24R3xIZ1oW1faEOvT
YlhnHWaw0a8Lue9fem5LLA0hmdmWBaHdaFZZzrGHaWII9V4yYYdPF/phnPp9
aZU8tbOB3uizohPNfHNrvOMCBYpyVOg7yrMLlTioHL3cIsHD0034e5d0o+7H
V+MrNkvwrmNztaF7F/pu5Ndw/qka5Xp83bSYmz3oV76y9VcjdSplk9uYnC0c
xPDxCgv/8vFI9RdnH+eNDuXZo73j1b0eNPSt1e6pL3WotnkTPbSudiNvws+f
wvw8Gmb4coTxU8n6mbdknf/MTnRwteyc6Xb6VHac0rEBNj1ov98/tY+S9CnT
Pp/jtpf3IJ5NyfzuKg78mf7+zKFnf9DwhMIj469y4L3zRptv7h2ocYP86WKf
HpBtLFp87eBv5Kjsyhkd0AOjkoweu337jZavki+7dogD3J9XlVZebEfCmhPF
owN64X5btK77txYUMr5mq+wuPqiV9dGYVNOGXp0sXXOjWgCBA0YPbe3fiurV
dDI7IyTrQfb2/v7UHzRP/Wx78G0x5A4znn904h/ke9I6fPUiGWrkxJ8rftp2
Ip2aG2l999KwjTNac4xiB+pD+u/xcf89pEX0nhSs96DVRO/pwXoPevA69JmP
5PzssI9a/UmpFZUdjHrX/4MsRc1pc+G/aUPvyxJCE74rUAWW5zQfmXaiTWVL
FTreS86bFoZDAiX/7+UW/kKVlQpU6nqvZ2cH/0F3SH+/btzfDzH6UQHWj5A3
0Y/mY/0Ilat/XiY/XoHy60wKK1X4jexj5i48kaJAtd+ldz38pxUpF77dfuO8
CnXh+tD51JxW9PpXk+7WzSqU/ca6/m6P25GT0H/qy3BVarFZ53pBVAvyenmw
39EFmpTbueyZ/3S0orXRdlOiKzSpOeocOY1drYjpJ2iM+wkidaJfPcT6FVL0
aPDK7aNHTfT0fBpQ2YpGejw0cg/Wo2J91/GiHrYge6LvOWB9D9kRfc8J63vo
2h+/dUv38OGozna+g9Mv9Ivoe0Oxvocen3qi6DCRD8O0RTf9WutQ8tJ7A8Vv
+BDImbzplt4P1F9hR/q0K3JUonFio5FbC+I6xzuXdMhSBiam0xwPN6GnpL/j
ENzfEalcw/rgaqwPIo3TIwLVteUoSv9NcseGBmSdrbXnm5kctU/tgav7gga0
O8Xh4tQJkvnUyBqVW9KMYibfPxMkOV+br9nrYBvdjHaSfpFpuF8kYvTFxVhf
RNZbOnIzHJUox9U33Ze01SGzd3NOXXusQgliT15pWdSErpN+kmW4nyRKH9RW
MuqhCvX7cNiap2n1qF/qTkWHA6rU3ZpwuRML6hAEF5braapTvot2a5XM/4Gu
k/6TTrj/JFJK6Ke74Jo2FZJ/7/y1X/WI0XNVZV7/n56LVhI99wbWc5GxtxHv
vQwfPK7Vn8rvW4cue0/M8LrMh/HDT/opWlegDW2dgYUv+WAUQpmZ/f6IJpg3
vY1pkaVOTw2fseV8LTIh/Thn4n6c6PGx+xd+TlagRAmnvu/KqEBB9zfM5+xU
oZZ6jVOfuCkSmvqYD+3iqVF7YhK+Diy7ClSO14rwEjXKMO3I6uYBjyHifGLq
pRhNykHm/KYB/bJhP+lXugH3K4VzRP92wfo3TCL6dxnWvyGBPL8qfn5YQ57f
GD8/fCd6+NeVf/VwGEnefxx+f2De7yB+P3hO3qdf4t/3gZiZvxWy/ZSoyB0v
GibpV8HuyQ4nxm/UpuhVnlHj3nyAB5mfMtYZ61JTwvX5bz9WwDHSn3UD7s8K
WUT/H5T7V/8HbbL+nPH6Ayuy/o7i9Qey0/F6HofXMwwl6/0eXu+w69/rE5j1
aYLXJ9iQ9eeM1x+cJvEFN3B8Adwn600/8u96Azmy3lRq/643GEnWaw9erzCV
rD8/vP5Alqw3b7zewNpjeKRXty7lWGgnbMiog1qy///88Xf/BzHZ32/i/R0m
En8wAfsDmE/8gVLTX38A1qQ/7nrcHxc4//Y30I/4m8fY30AR8Q8rsH+ALcR/
qGP/AUtJf10f3F8XCkm8iDOOF4Gv//YnoEH8xQbsL8CD+Jcc7F9gFfEvQ7F/
gXziH1ywf4CXxD8EYv8Aj0j8yaDEv/En8Ins5xvwfg52/97PYTSJR7mE41FA
jsSjtJn/jUeBHcS/KFj+9S9QSvzLfexfoJL4o+fYH4EC8Q/R2D/AdOIPHLE/
gCriL7o3/PUXsJTEtzzG8S2wi8S3TMXxLeBP/Mdu7D9gAfEf57D/gK752D9c
9/jrH2Au8Q+eq/76B7hH+jN74v7MoCaH44lycDwRtD/H+HQAxqeQQPBpIMan
oEfwpzHGn9BK8OVpjC/hIsGjLhiPQgnBo9sxHoXBBM/pYjwHmwme88N4DuYQ
/LYF4zfwJvjOF+M7KCH9o+/h/tHwmcQ79cXxTsDEOx3B8U6gQ/CrE8av0Ifg
03iMT6GK4NkVGM/CaoJnPTGehSaCH0MxfoTZBD8Cxo/QSfDicIwX4TXBk9sx
ngQd0s86FPezhk4SbyXE8VbwhMRbJeJ4K2DwpjPGm9BK8OYNjDfBiODFSRgv
AoM352C8CQzebMZ4EzYomITFB9HQOG98dV5jD6yNmT3v1T8iaH6uqnj8bi/4
/vnNe3hTBGpJ8ckBC7gwwGHE2GlWNDxtKv38u5IL7XNvPb54Vgjn+F7rZzn2
wut5k+WPDBPBFsGP9HFve2GN+rLVD/fTEB6bt5eq74FnEMfZrSuG6uddmvJb
e6HBPaXlm4UMNaB2rs59116IS71nLUgQg8e7xrvh8lyYvpATff8HDRdNby59
cp8LnyYEvR21QZZ6Plq9xkm7F4qo1tQsPVmq3ljbdGphL1R1+DhsGiFLTZhW
LUcFcEFUWlb9aKsstUe+YHKVmAsfouyHVB+XoSxCjr4ysO0FrVV6ailVMtSl
YVMTMt9InofwKWWYT4FMwqdMwXwKeBK+xALzJSD6N18CSoRvicF8CzB8iyPm
W2Aa4TsmYb4DzhK+Iw7zHSAmfMZyzGcAw3+4Yf4Dmgn/MRbzH8DwE+qYn4A6
wk8MxvwE3CR8RAzmI4DhK15hvgIqCL+wHPMLMJrwC2mYX4A2wid0Yz4BeIRv
UMN8Awwk5/sEfL4H5jy/HJ/nYQE5z/9J/Xueh3By/k/E53/o+nc/eZAj8ZAV
OB4SmHjItzgeEnYTfmIc5idgHuEn4jA/AQMJX2CA+QJYSviCg5gvgBJy/q/C
53/YQs77Mfi8D5qED/iO+QAII+f1fvi8DvXkPB+Kz/NQQ/rdm+J+9zCWxGea
4fhMcCf8gC/mB2Av4QcOYH4AvMn5vwqf/+GH6Fh8ryENsZeWfb/+TgAOhU60
aoII7L8kh512F4LVoZbc0O0i4O0ceTAoRwgjn9T8tM8TQU+u0T0rnhBGiN4Z
9crR0N2h8esXiGD4xEL3OzNp6LISG988LIIGRV1f601CyOa5jzW9JQAjdV2t
80VC+Em710QrCWGeju5DWVMRDFSYc5TjI4TNH3pzNp6kYVSfiJZdzWLIHOzX
MqKdhvaXfW8/jhJD6/q3w765iyE7LC1U2UoMj11CjjtL/v7E5Nzl9iUi8D43
PHhTpeT3x3zBT58GUeMHjwRjMRRX6ww9sYSGRLuI8c99Jed1C6Tw4CINgx9t
sTanZCitdUOtZ+SLwfyht8XxfhJ/voY/TCtIDKu3nHGt+y6GCYFlhpWDxJBF
9MAdWA8EO6IH7sd6IDD63i+s7wGj753E+h4wemE91guB0QuNsV4IjF64COuF
UPDc4nroA3nK6drdHZPPC4CTcNXq+C55qpz/bG3f/kL4RuLBp+N4cBhK4sFf
43hw8CPx4G44HhxsSTx4K44HhwVEDzbCejDUEj1YGevBsJrowd1YDwZGzzXD
ei6MJ3quAdZzIZ3ouYpYz4URRM/lYD0XhERPvor1ZEgkenId1pNhEtGTB2E9
GT4RPXkZ1pNhEtELA7BeCIZELxyM9UI4R/S/oVj/g4dE/6vB+h/QRE/0wnoi
JBE90QjriTCZ6ImfsZ4IZ76bRkzmKlIP7i6ol8sQQM5BoeVBif8MD74Ws9lR
CBUkPl4Dx8dDJImP34Tj4+E8iY8/hePj4T3Rd52xvgs+RN81w/ouhBK9NhTr
tbCR6LU+WK+V4COs/yZh/Rcsif5bi/VfcCP6rwnWf+E70f9isP4HjJ5XjvU8
6CB63hms58FAog9Oxfog8Ig+eBDrg1BB9ME3WB+E06m6XP+xKlTtRk1jXokA
Pmw7HrjzszLlU2UAZbuE4Eri/d/ieH9g4v3dcbw/MPH+jjjeH5KIPvse67MQ
QPRZwPos5BK99TXWW6GM6K2KWG8FRr/Vw/otMPrtL6zfwjii3z7H+i2MIvqe
Atb3AIh+Z4T1O8gh+t14rN/BKqL/VWH9D64T/W8u1v+g7wOLnvqNahR9fqOz
808BPCP5CVdwfgJsJ/kJipZ/8xPgK8lPqMT5CcDoqWexngrXiJ5aj/VU2Ej0
0f5YH4Ucoo9ewfoo/EdvBZrorZOx3gqTiN6ag/VW2En0wxCsH8JEog/Owvog
BBN9sAbrg3Cd6ItbsL4ILURfbML6Isw8veF8R44GlWe1e+i2dgHEkHwKfZxP
AcYkn8IK51NArxfWA+djPRBaif6ngvU/eE/0P0es/0E60QuPYL0QvhcF5hnL
aVNZakayAfUCEA3G+RclOP8CLpL8Cy2cfwEBRP9TwfofDCN632Os94Hnv/VA
yJtx2K/6lg6VWuyjE/5CAHtIvsYFnK8Bl4keuRjrkfCK6I2+WG8ERp9UwPok
1BB9Mhrrk+BI9MGBWB+EK0QPvIz1QBhB9MIzWC+EB0c3Tter1qUqVb3Sf14V
AJMf8hbnhwBF9MoCrFfCYKJHjsR6JDD6ZTDWL+EB0S9jsX4pwZdYb2zEeiOE
E31xGdYXYT7RH9Wx/ghfK3x6XsjpU35DB2h5nxIAIvkoK3E+CuwjeuZhrGeC
xWfXNQpxPMiasqotIFWMRBqUer8TPLAVRwzvthUj04mcqSo0FzQ/lHTKPxej
YPqS6bYpPCjUHKoRf1iMdCeOVZCT/P4jtbE+RING+sNW3ppdy4V5nR7NRmUi
lOsZMWWZOg86hu7YZSEWIa+D14rX2fMgzvO86iQrGp3KUSsaHcCDd/tpRXox
jaZ7ea5ZH8uD/cNdrk06RCMuL1H5Rr7keYpinEOyaWQbZNVamdMLuepbBFda
xOju6LPzCht6YdxslXP3HojRpHZxbnpfLmRE/TOuOFKMVuQMXnSS3wtW15eP
ODhBjOQ1v80ev5IDR4O478+GCFBbZMfgbU85sK1Z5fr/1YMp85JLr0zmwE2X
H8UvnYTI+49posMGDgTCT7POiyLUpfh54xcuB57yDKeWjhchqxPLPqUN7wHh
/viUi74iFND3i1OYRw+MV+uvtylGhAz3PinV3saBxi30RflsIRrgOjU/4REH
WiaHRp/gClF2ZdCxd1p80G/vbv15WoAiLdcus5Dg8OZp7XlO3wToUvUwkTWf
B2INr8t39wrRtiUyXfckuNHyxK60MQUC9OltjMrN6XzQSdP6WrpYhHYdj9Es
aOfBplat6kcZIrRn0YRzCuf5YC5X55g5TYSKsuudx0hw7/blJ9qrdkieT+Nk
5xIxHwrvTrqgkCpCv44kD7o1hA9nbOYWeRULkWZX1lXtVXy4f2HZnIfqIpQg
GOV45qUA5oQHX2+oFKABP4ctC7QTgO3GQ1tbzwnQO70ktOyIAH7Giz5+bxag
tRvGnjlYJYD9nXHpapOF6EbT6nerLITwJKjo589jQlTyeozzUcm5j8kfZvJ3
x9svEc2fI7XzI+UMlROktvPHNOu8H1L79YiFszaPpdl4vvSdWWqvdESovXKn
1TMNJt5PhO74Pmues1Fqzx4fc3RNtdRmfn94+gdl8zXS+70rvKpc9IhGJ7vm
jjNJ6GHr0fjeGvuT7pDasXmKuu36UnvklXUGkR5Sm4lXdd5YtuBNvADife4W
5dznkHxOAYyaJjsisVvaj6bdWX/O78Ae1mbiUR85h3n0vSnBO2T8mHhWZjxm
4vFh7VI8Pqxth8eXtR/j8WXjE6Px+7N2JX5/OEfej+nXMYq8H2OfI+PD2OvI
+DA2c787eH5gPhl/Jl63m8wXY+eT+WLsM85HC0RRPLZfA5PPORLnd7L5qCk4
v5ONP80JKht5XESjOl6EYucWLtuP5FVw4oyZWjzWZurPeO71fKeMRKx9zn3t
JWsFGk0I0E+qcell51NzEGde3j9Su66yUjGRI7X7aTXdSkqV9mcZQ/LVGZsZ
//k7aL8Re6R2Fc5fR4HfjY+vt+Gyfz9cZppsbo7UxvnmXBC6+9hsXSG1OYu/
XjC6IK3/0FK0/qHpDQHK5uaa7u/PZ+Nlj7zpKYf+0n5AzPh9Xei1PumD1J46
Ov3BqI1CJK+XsWzgSz779zhelg9P5xl5vHaQ2nlHZgRqpUjtBtmCukmyIuSf
N3QTfVP6vdPpBglb1aX9h5jnV7f39TatldqK076/ejNQ+n79h/ofrfCWXtcb
Vd+1+x9pP6ILTt9kaxZJ+xX1q3i3NP2M1I5bjW7v+UCj2Z9DLZN/cdn5Klh8
fkLHMqnN/P0mmpciLhCyNlyw2vdoiAhdaJ948lwBl90/korMGpJn9wD9PX16
/nsxMpmXemO0Qw8smzP1/aabYqQYnjvYNqgHdpjYLF23S4wGHbb2sG3iwPJ+
98zWicXo1oxlk330euDtomgHhwoxWr1u/2CX8z1gv4cbfumbGPkkDjDYodAL
Seu0PaZzxeh5TJPNFIl/cbVx/XQ4j0Zf/jmj2ZPOgX5BR2c9v0yj8YUnRni+
58Dm2Ai/oc9pVJYVObVG4v+09oWF3vq/+NCdyTqdkRwY6xrv/iSMRg2X012s
tnNg1jqD5q/uAhD/ch/8IocDEx86Lj9znQ/z6lycSy16ICp78v6LgyR4cV3d
FTM/DvxMyT7rP44HmUaemr8NeuHioqGyFj/4sGXy1NdhG3vBd6dGwf0pAlCc
NGH/M38OW4+D2c/2f9gWF58o7a+k2L2uWvEeHyZPOr/7jF8PqZfKh7G1Nwz/
WcoBF381a9M8EZS/OBxWe4QDv9yaTvn/EsG0wYahNzdxIHlp5MbS0TS8IuPj
jMcHKsj76+D3By55fxv8/lBLxs8Ijx/Yk/HbhscP7v48trVR8nv7mck8l52S
81W6fLtTEgeuddRHLZsthETju9/tLnDA6aVP9HcXIazWNRNGBHJg2eAfL9Kv
ieCRTEWbSRQH0qcm161YIoKHJUo2ByR44JZa5YjHUSKYu7fu6/xdHBiwdXDm
9LtCyHLQc7rl2QPh4+bqXjopgqLQpVWnOBwYKJ6m1XhDBLM8a91uizjs/nXd
2PmG62hpvyX8ffRAyojyHzK7xKz/GWv3QX/3axGoe29MadrHAfqv/xGB27O7
xT8qpf2Y8P7Hgabs3AdjXGhIVM0rsX5NQ9WnTDUZCf7YoRzyvrqOBnfzM38W
mgtR98cP+2oXieHdYnsnj1wBSv794PD1XzSsqdhxyHiGCE1ZF7fuXAoNpYv/
uWx5VISWBrfc3TdaDHXv5afWSa4/MYsbOmCrGFyPpt7YfUyExsvXOWXtpyHP
n/9KN0GClxJv+KnU0jBR9Lh5bY8EDz0K+75/ugw1zG3iTHRNgFr6/PlUUyOG
b/MfFxulC1C4X9acYcNlqD/y1rEH+guRbcmd4iErZagVHycd33dciA5OnPd7
2Dw+lA1QXDNWUYBqjvcPvhLFh179sCMjW/ko0Mz89bfvfNiXHlUXOE2Ans4W
6myx5EPN+xXm3Gg+UixrOHz+sQAqng/xOi7iIzN7hTiqrxB6LR1X2XoKkHlY
ifH0gULYseHW/ivL+ci6pa1m33IBbBJGPQ4cKEB3tTXyVo7kw2H5mcc8A3jI
57PH/tQpfLj1syaqX7c0H2GM79LksYUC1K6/pMM0WMzuv0y+wc7Ce9tfmElt
58cPA6PPSO07dOO4pm4h8pu4qL57NZ+tx8Dsz68nis/MKZPab9burEj6w2dt
7yv97rkFSPtZ3V25vzBRR9qv6EHRxm6T3ULk3HRx1GZHAetfmOsZFjMGxRbw
0a5bWR/+ecxn6zcw9VI0Q4yNtthJ6wVuU+8+OHSb1P588U17WTbjjwXgUHVn
z+ocIWsfCc5Sd9CQXo/YFE2Vukv7aTnvuBzoMZOHFPZ6NRgmCom/YfqHCCHl
2s/C2HF81p677eSIoHt81Ev2w8l4P0SLyP53Gu9/SKUF748z8P6I7pL9LxXv
fyiE7H/r8f6Huv69XyJNsh/+uz4GB07h/ZDFn4Pxfohmkv2QGT8Gn5TWmY26
ayvFK/rZU+naXSJU/3F6ks/9XtY/jTG/fG25mdRfnTn8K85/pvT61rtzqa5A
7n/6kXFh/jzD6m/2UlvXNqru6W2pXe102PvpABEaFjhkv+sBLqwab1BgGCJC
M8pK9gmyuHDg8pP818kiFPnikMEqHy50fVzlPzVS8v2vUdyugXohfgIv+7Nk
PsUpJrcD/WmYGtKnY/xiAVJIXvmqPJgGj2xO9L4GPrLal2J5uUUEFhXp5rlr
BYj6ydtm4k1Dp2nRoxZ/PnJJKP5WrkPDKpPRvKVb+Gj4KMdfzxpEEDn95eya
dQIU4jNsZ/thEVTtvFmlrClAJzcvTLixRNr/a/4Tuz2fVSTnpZosYWGtGO0a
45vJm8YH2U2HXidfFaOoOetiE17z4dVA77drC8SoZePDnPG6fPiaevT6lm+S
862//x1T4MOsyzY3V2nR6PFSrfv6G/mQe64mbd4UGvUPT/lZMIkP/U4MmOl+
hEY5Y2tvWlTyIby64fD3VhHyvWN7R/0EH956nQiTGU+jKpLPxsyPBTkfMPPT
TM4HjM2sn/v4fMB+f14BSVsSf9FovfOYKI+rfNY/MPVnZSwPzH0h2a8Z28Jz
xvjZ44RsvaI11Trqt9tFrK2fv3ZHzWSatQsuFn5XPiK110QMcB9XLrV/t9Vm
rjknvd9NFx/6cbvUXn3pu1t/V+n9h/N8EzdfEpH6YPLUivj+oed/iFnb9cWp
4eJIqT2+W/O9v4WY7c/RZ0GnSvElAWtv5V9L+GYnRGfyDTPiy+XYelXM71F0
zo32D1J74f3UqnhrmrWb6q+oOR2X2o2dAs+qc0LWbrkZI8iWk/6+zWfY1aiN
IlLvTYFKvBDn8q5JyNozRnSsm+Utva7kN9aG+05qN4X9PC5jR7P269MXmlSS
aLbfCj18za2QWml/tRk7fb46OEv7scW+XqynJDnP09zjq78Mk6eY9cFcX9p0
P1mUxGPtIRteHZlpx0cHjrvdeG8nTzH5brgemyKlJasy72K1mLVzNqU/2b1Z
anvUetgsVRGz/U8+ehm1TckTsPagdOtns4KFaLZTlFJQoBL7PEU6/EdZbors
fDD3azDcWOr1Rmo3tirM2yRZb4zd8iTpXWSa1LZXq7lzuFjI2idnXare6c6M
hxK1YM+RVWdvCll7v29R7hM76XW+WPnkxEKpPVp1UIfCVJq1vfVs55Xeo9l+
LTu9E/MKLwhZ+5GasXNDP2k/Ovpu0hvF0yL0hv+PwbkSBfZ9mevnExVPZ87g
sXZ4y+jtinweqaenTF3ddP3ksUYxa3/Kmda4Okhqa/Z8m+zcQ7P9h+72Ub8W
/0OAjIxuu83TVGH/H/P3Q3zdX6+ZQLM2MrgaE5ovtZ+M/NQW1FfE2oP/XBp1
MEuEQpfWNO+eqfqffnsqlN6FkPzFzULWnjbg9QT+Sel17tt775+Z0aztqx78
I/mBdDw/TUtxc+QIWNtGblj2/c181o6f1FaTbSftpxd0ZsOf/8fVecf1/L3/
v733kswUKZVZZF1HCNkzK4WEyMzMKpRRSkjTilARFSEcJRQiSbJTaWmP1x6/
19d5Ps/r9/703/327PV6PZ/necZ1Pa7rOifyp/w8veM9K7tGbRNTPn1yiuq8
Yj7u1bL7wvv1WvS8O7IftRZa6HNwLzeSPZ9OC524aNaRpCal5w+homWH56rJ
nyeg18OzBjZy3lqzp2e3FQLK7Uc9zm5wk5+/d8t9Yu0Q2fxc2iOifetHTdr+
7PWEsYeNtBP52Ozf+9JB6488z38se78sz1hlvOCdm5Ser6V0IXFIgJGIXn8e
OiAk3ktCOcNVcLGsWH49/9WyEZ+vsu2hjS6+bFfeO1NEeW5QmP9yN/n5fVmO
QzapRYsoVwb/7N57lRjvq4z4ce+F9v/0H23k0mfgCc1ZfOzGnfjQYrM2nR/Y
/eyr+UHVr1VFeJH6lz2/vfVof7nxr3310PmPV1Y2lcn598i+Tbw0CeVxSR6X
Q/6I8P2sKyrq9gb08+T39ZFTwt2eHzbL2dlQ3bHCix3/uogjGiU94ymiHLN2
4JC9dvLzBft7C0RpySLKyp5mtU1nxLjQKLCirFaXPi97/ejhkDWHbAT4z9jW
84Fr9ejzsvvvp5n1Tf9eJcS5Sw5sODDYkN4vsbcNUUr3qmGRYXK+fVhV+eVF
Cd0Ps3FTTrziDREOT/F2HtndgP4+e/3N9oJb4mw+Pe9wdoH78/aH7PmxRmhm
Q+rT8Q/l5x2OEISD1xURrhZLQre5GaL/+gfGaJSoY4XXDSHz/8ZoV/zKZeP7
yPf//O1p8mupbH4cPrGrcOh6I/r5NWNeRgRKjel4Yvdj165eVRnWV2Z/97a6
+sXdhP7/7n9faIxc74epNd+Wn5947pmLXUiXCI/60dfsrr+xvH+FxRbPemiC
1JWXHtT6IsX/c34HPhmQkj79IJ/a67NR0qhImf3Fvg/WP3l2U+/rsDI+ZTzn
4NgUX7l9PHHFgIlRfjwsmubDD5jFo/vj8iMvpapxuLD53/d3yffjfmW37lAH
h3JwL87E7elcyqka9zhNevLzG0XhdW0jNXiUG6y/vuam8fDeic2f2xeI6O+x
15uybn0TVHTiqUd6rOkfKqK/P2POdhzzUELPh2T3g/1y6UfVJC8uZV+zvJea
HV2Uz57MDvG7x6H7yxoWzx839ID8PEjLeyYv5/fg49OJBjdPP5DS+2Gvx2eX
3dgq6cTvW/E4g4cKiL2fLq7n+HsztOl5iOx88iPqr3htHzlzvMqbTGX2A8u5
93utquzkUp5XNDuqV578PMeHl156+/Tg4V5WibrX12oj9n7Y6xkq0wI8Q7vw
oIR3C1+KDeh5kOx44vfbvuBzNYf2/94u3bIu9OJTXn9ujldCWSfWG3RdeXFm
F21ftr2QUfehsKSdskqX2H3gqg7KNk21rZvGttH2ufQz7NlJ607K02PaNnha
tOFN9aPz37nI+F/7tGFDr3xfj5Eq/3Neowp60yEqnDung3JJWkrLMWin63/n
I/W/y8bJz2f8ZDHs3omOVjx77s7dI5L4sO3f/TdhN2FCSVgOl/I4k/6vyu9x
6HmIrL8Yv/mb5c/oZtpfC5f7/bKwl5+PuHNmao8Tf1so2w0v+m3HraX28uS3
OGn98ia856SGp5qvMmJ/j71/1z7DJxy+3kL5p/b1v7m92/A/NFdCl5ZNKXR6
Ij9P0fv597ZtY5opu3uGx7z8UUuf1+Dxu0Y/1EI5sG6Y1SHDeqwTOi5lXJUK
mvGvfevpepo/xUBjRu8WyhMOnPwc5lOLS/JOlk36ZYS8pvjt8lBrwA5M/vMw
kv+MHwi72dR0cun5iYVxC5eFnRBSZtsr8u21JRte/sF9On/HcrUF9DxF9v4X
vMt/cPTsd/l5mW2VW6pGV+ONc9b2muOggQb+m9+q8Vtm/7VRZP81fJPJV3+1
41++Ov7p99Zn/xQttLF/8d7Njyuwwu89zwY36KCUDSsvJferxLNnrW5UCzZA
J52mbxagCnzwv/u34aNMvrvHqn/57nhprWaNvguPnl/IPs+1ynNaI25+wz+E
nRO8vqqjc9cKn3zr85buP5dG9p/DmXilr2CGFvoQq1wxKfudvF5g8b96ARxh
v3bSkI86aJx+dZH9pA+4jakfsI36Vz+A3Zj6gQ8p/+oH8GMm/74/yb/H4Orf
1XuvBj0vkK0vOEDqC7BBy/FT+8Va9Dq7HjgkHkjdFv4b9PdJCh3u/N9+eP/3
9wtWMM/Lnj/HPu8H8rxQwdSrLCH1KsDWq6wg9Spw78wH99VnxOD9NtbFwawa
2PqXIFL/Qs9DWkXeNz1f6K/3qaZc/h8Y6V5jN5XPh0mkf0Ie07/Y89lymP7F
Mnt/Z0j/ggnMePYj44tef0bGKz1fZjgZn5RnkfFLz38yeFRT0MepAdjxl0vG
H71/XzLeKB8l45Gez7SOjDdQYsYb+zzsdQsyPul5SLPJeKN8hYxHuh8P/G3x
XZTxF75qzy7WWs2hz/er1jRg3cYuyk7M/MWet8bOX9Vk/qLnLwwg8zHlsWT+
pizu/Dd/0/NwZpP5GU4w8zOJH7bR61FkPgd2/moh8xflpWR+g3HMfP7f8+5U
0Bcyf8P/zO+0verI/E25nczvdD/eVfVjr45exQGN08T+2EDWJ3r+xWhirwBr
r7D7/bJ6sFWvzZfz+3Jof3lE7BHK04j9Qvk4sV9o/xES+wOCGPuD/X32OpfY
M5R/EnsGdjP2DHs/0tnEXmHPd2PfhyexTyifJPYJ5RJiz9D3cZrYH9DA2B/s
/bDXTYk9Q7k/sWfgPGPPsPfD2htuxN6gnEzsEXoe121iX1BOI/YI+DL2CPt9
rP3BPh9rf3CI/UHP11pI7A3KI4g9AiFMveY1Uq8Ju5h6TZ7xv3pN6OG6fJFY
2QRt2+pw6sgpLu0fTeQ8cTjF2L9kvPAh4vaHiAVVAvjv+V0CyFO6sCtnspzF
fqtuqSXy4G/ypI3qBVyYhl8X9ZnFhxu3x9bm/RLRz7P7JU2XxlUsWMujfGfQ
Q40B6vLraSVB9oGRcu4Rc+TAExMBvFqSdk75oIDG89j+FhCi7OGRIaDcs/fT
30eGyK8/6jobaXZNztkkniBnEk+g/W8k0e8p9ztk3WPze9nz/HqxwHKdiO73
zF5fXNvwIeGT/PMfY7a9zuotlp+v6C7Ie7tWzu+EQTnVd8RQc3hb1RwzEc23
YOfXhGsTrrmukZ+3d+T4bEGcivy8vMVET6Pci+hpcJHR09j7Y69ziX5HGRH9
jnIY0e/Akk/0O/Z+6HnUy0tvOigLoazPtJDgfmr0+9n55jTRlyjvI/oS5W1E
v6KcRfQryhyiX8E3Rr9if5+1dyyyUq+d1hYCJ2i+Xmi2xv88nxpyJHoO5Uii
51B+R/Qfup6GE/2Gsi/ReygfJXoPPa9szoiRwXVqQhjDI/4J25/Z8c4l/gjl
POKvAKvfbCR6DuV6oudQXkf0H7q+xRL9hnIS0XvgF6P3sO3D6jf1FWvT7Ork
v+9N9BfKqUSfofNPP6KvwGhGX2Hbk72eQ/Qayg1Er4FVjF7D/j6rxyywPS++
fIM9z1AX7SB6COWvRC+h57X5Er0DdMYRvYP9ffa6IdFPKPOX/9NPoJPRT9jf
H35uS+atfAP6eVbP+Eb0DMpcon/AIUb/YD/Pzp8uRM+Ar4yewV5n9YpaoleA
HaNXsNcPM/unfCP7p8BYZr+UQ2S/FGD3UxlO9lOBJvcg1wsWJmjO+UFK7i+F
cJPZr0WL7NdC5+ON5DwVyrHkPBU4YrJGXCObF9l4Oac986doooDy+wcmG95n
Cmh+Fjs/X73Ssz7jmZxvcx78iBDJOW7Woc5PR8QwbVh4uVoSF4rOXFuxLkcM
tjPvGB4r5MKt2wXn63+LQXPdR3fNVi6cKvxb7KchgfpgzuETZjzYVK2n1ego
ganMfpQLyX6UEM3sR6lx/d9+lNSeeBKsu9P8r/y8xBHcgPOOZ+ScsuH7g0lj
pPCNV3NV5Y6A7ifIztf91bycfTKldP6+/HpLo/4MOfeOCL6SUy0/T9FtRNLS
wy3y+fd2wd4Xwx3k17uR8+IoHyTnxcElJn7Dticbb/lG4jGUK0k8hnINicdQ
fkjiPZRnk3gP5SoS76H2nXjVv/gM5QoSn6H8nMRnKEeQeA/lMSTeA5/PiKds
LlWk5x2y9npn/DinBbL2Z7kmf0bju9NyLmtaljRtlJxfmG1Ymv9TAqVM/IRt
Dzb+MYzEQyifIPEQyr9IfIXybxJfoVxD4it0vu4i8RHK9iQ+QtmLxEcou5N4
C+W9JN4CJfzokeHKKvT52fZx7Lp+/9pPKW2vES7ne+UFynn0/pAjP82lwMYn
8ki8gnJ/Eq+gbE3iHZRzSbwDjjHxDLa92Pm+k8QrKK8m8QrK6iTeQXkUiXeA
y1krg4wpavR52OdVnR8UvP27lD7/Elw4c+RGOd8dZNRdKJSAi9m3hIg/GvTz
7Pev6BxY2yiQ0t9Lvt/lZ75Xzk2785on8iXA6v/3SDyAcgGJB1AuJPEDWMXo
8+zzs/r7IKK/U44iej3lJqLXw01Gn2c/z+rxk4geT3k80evhPqOPs//P2s/P
iB5O+QHRy+nnt/noGp+fwp6vaoSmE72b/v/il3mnOwykwOrZa4ieDXXeb/Wn
WxrR9mQ///3n0eFJzVJg9WlE9GnIiQ56tr4f1bcR+33POUbTxFelcMI6MDX6
Nx+c3vdfNCFMhB3M6/RbbvNhZoh0ffooER608sODh8p8KNPet9rnthDXu6/Y
NXsgH6bl+jx8HCfEtu/sfznI7Mw7gyeviTgoxFM+Fh/P3CAGveAjby7XC7H3
yYaC/tEK6GfxVZ2EmWKsdcxxyqjtCujk554Gu86Isfn5B8MU8xSQzQa0BOaL
8S+LBIucegWUtU3dNvOKGO+bHn6l23kF1PKxftRGsQgfDsudw/FURJnPHWac
9xXjBiurZL+9ish42OL4qzdF2L5c0ffFVEUUURjXo0VHjJt+n70901IR6dwP
OPFzmRhf2nVJW0WsgJJPeBZvvSrGjkOfaP4eJwarTWHiXrp83JH7KiNwpAjq
JNHJD9R4eMPFP9KRT0Ww8ntWR0A4D/fMeDGnLF9+PtOBxDvbKvrJzydl80WC
qzXQ7GtSeh7QBZKfC2+ZfFz2/MZGJl+X5ZP961fcCODCku4DHBPuSvBczpbP
E+K40LfhVrLTZwnefSMMD0nkghJn6SN/dwle81zjnd1BDozInpzY+7EYFy8r
MW9L4cCF2fp11bXy80pzTVFoxFL5/rLNagm6G+LkrBIYnl2aI99f1uic6xDX
bmIsPCKtfV8povkZ7HrlStY3yqlkfcNNP/ZVmAV1wT/zIEqCH9+P3Mrxlfmx
F/KrVjQLITx8rOhjjKy/japNPjBRBMfHBIYckvW/oTX9hw4KE0HufZvnT5T4
sG5lif+6W0LYHeL/pGw2H/oMNV8XJBBC3li1vg7L+ZC555Ox3yAx+Pjb3hl7
XOa3pfCS9iwWg+qFGWiGzI/kfu0x4vhRMVx7t7l4WZXs97UhPyZDDNvnPorg
y/wGu2is1zxMDO7rSqI21vFg/sHr2oGnxeBY3Fh38ikXeus+/l4QLoRFM4u+
LFPnwZQTCUUxZUKqX3iQ/GnK8SR/GoyYfGnWPqpl8qVZHs/kV7O8ncl/Zs/3
GszkP7PM9icpyX+mzCf5z3BI+na1momI5hez+WE5GX10LObK+azJz6BBp+S8
aWcCd+wbObuVL/WfpSGh3Gd09yqvyRKqr44ufer19IsI+3gGhc2fJKT9gb2+
7bVBmoGn/P+xKMcjJFbOOoPXKos+SXAXp7D32lAhzT/eGXft3M0oLgycWaox
vlYCx51urpg6hguB23bPO6olBYf97R1RmVzIEaV21DRI4UNvcJ9ey4Vuy7wS
HbOlEBSc0yfnDxd24BPGvCwpOFuFX+1TxgWVbq+3GxtLoSr9tkbDTS5UHPJ8
5LZKCtomXQdsvnLhQc9ukzSHScH0PFxM/8CFqf9uSAp6fAWPHoflPL/73Ox5
qvLxSexjLgg93u5PniSFzPnDH2yQ2f0Hp2wJ9erkQb92k26JGXxYlFayStGJ
R/vHB5K/RtmU5K9BPJOfxub/1zH5bCyPYPLZWGbz11h/gO0PBiRfjfJ3kq9G
eRrJb4OTw2o6G7Tl598O+/cPHPg46VlbbLAUZjL5tuz1m0y+Lctsvm0CybcF
6/lHq3q6c6B+c+rA5Bop9JvrMzlwAwcWzzw8wmqf/HzZpmPXEz60iWj86d2Q
NAvDZfLzR0XdTP76XZLQ/EQfjWhh+UB5/qLG5/Fe927Jz5dtPp66+ZAfD7eq
Ha/BtrJxW7bPKqKXAPd9v3PWyl8iSFp5LuC9vQB/0Tzql/hSBB0RNcFWsu9L
vhR5ZLqTGJ4NaE/4EM3Htx+aJ/0eI4DGYzoVdwZz8XAxfh8o82unXrZJ6Sfl
4D3ut/udXiOA6TWely4m87DfnaTk1CCZ32r42F43jodfbn36+JeCEGZ+LHOd
0J2Pn3YduHmMz4fJHucHNxjy8ItbARUD+wjhUcPE0jXNHCytWHF85l0hdPRy
3H/iEBc3BJ+JXXtIAXmqJYjH5knxr3UHJxheU0DbRuffqt8txeE/J9oW/VVA
V3pfKhe2SHGbu8jnZJECWs81mLM7U4oXZGddmpaugIYUB73q3CnF7xYa7Pix
XwFZ6bps6WkiP89VN1RYnzBVSuPHMRPNdAZVcHFPV7VZ+RweOBWs9XVfzMcm
Gfr6pVP5EObkF2E8lI/T/r53jC7kw4utQ6f0HCSg49mvxPnyw6EC7NV177JS
mYDGr9l6ij3D9qkqFcnfl63bx1OidVJcfHbI4togCTRYRG3xr+LglhMfn1gq
SiF9eXLFi91c3JU1QCu6UgId+bt+VOXwcNmdCo+OQVJwKfR9qJ3BwyvrV9e9
uCSBfMWGaT8H8LBz1bNBWXYKaH9mz0jDaVwcL+SNMtVSQGp/HSf0nsvFaiUL
J1rPV0A/ztctHFvFxX8CZ8Y3jJaAsmTOjIjVfCzoIzp3xlYCr41d1oT68vH5
jC3D7GXrhsOB+EiVUD7u5t+158QMCXQtHBM1qpqPV75fv/PKLjGAucHAyUp8
HDSivMfRbDHMHWj6d3en/LzU7lMeOS98wqfsfjpfJcBVgBN1NsU2lUtpe7Ht
05/ojfR8uO4td80duXysru4x8pPMLybmhfy8VTWp/pEd08SUT7ZcyDOMkp/P
vGTr9LjDfeXjbdLp9xuDI+W879u7kqhXAhw1P6NmZoTMb4gM+npihQDnZJ5R
e6AkhfjLubMS5wnwS2//zgSZ3xe9IOV55Bf5+atmbqmXNjWJKU/c9yMry1aC
Qxi9gJ3feYxewHLCx526/WfLz2dl+4uNp/mX0dVydlp04Y6Sl5wdLkX4aSfI
eUDDIWuTLxIsXm9oOls2Xv973qsAci+0vZwWIOc37eE5A+7IeWRB+s0KTymu
GV1QAndNaP4Hq8d9I/EvPJSJj54i8VFqz8WS/f7hKrO/P1vflsLs/88ymx+y
g+SHAGLyQ9j5eweTn/+D5OdDIZN//4vk30MVk6/PJ/n6sIHJ1w8i+frA5ud/
IPn5wObnd5D8fLD/bz4+ODL5+v4kX5/qPVfEozaqjxDC+dDRgbxkPq1HYdt7
JxnPlH+R85LBk8lXYfUweb3Uv/wUyvkkfwX+J/8Ydv83/xhO/jf/GNCl1xGZ
PUQw4kfs4VbZ+q+3/6mYVygExUfhbU6xUtgvWHyueozMfnHOdJhRLIXvTYLS
MfuEUOtq2NwZIYVu2aWhWz4KIXXPyDHPRsn1rrvZ2sLSD3L+PqXxbPZBKRx8
5yY4/kxun19l+itrj/1P/6TsSPon5YGkf1LuQfo3KPmR/sp+H9s+Y0h/pPyM
9F/KhaT/Qox+ZEqWlAdxomEhHs+lIBEmD2sdxIcbyXN/xJVJYT3jDzgTfwBK
GX/gMvEH4BTjXywn/gUsZPwLK+JfwCrGv+hG/Atoa1H5m50iP18j7PF7jc5Y
DhgPSjnX8UsKn0uufX95mgPJLytTH72TwosFfOfi8fLzZdn5LOjMhYAj2/l4
2UEIM1OVMPnZ8vMzzCs1QkZaytbVoRVzUufyaDxoA1NPx/rXKrdJPR3LrH3D
1MtRNib1cpR1SL0dZTVSb0fH80ZS/0Z5LKl/A7b+jbW/qD9H6u8o9yD1d5Sj
Sf0d5DP1dqy9P4upx2P5zn/XV8hh7JEuYo9Ab8YeWULsEVD9TeyHLmI/QDFj
X+QS+wKORYWIRw0UwIKQ52/t1/DBtGPtDZ1JAngf4gz+S/nwVVt50xZbAbye
WrLyFo8Py2/4NZQ/4UPMrhU2N2T9oeiSpq/pEj5AP5vkW7L+EP6y9n3LQ5l9
K5o69uNOCWQx9dxGpJ4bjjP13HWknhs2MfXbDqR+G9j6bhGp74bz/62vho3/
rZ+GNKZ+Oo/UT0Of/9ZfQ8l/66/Bl/989zd9ASx2PrPR/JcY9t+r2pa4UQDh
ujNj++eL4cyeiXUB5gLYNa3Japa5BHK9h35PF/GhvCaq02mF7HldtrY/kLXX
H1yiBSck4Px0Q+oZDwHMmlT0vPtDuR7+N9BguNZPHh2PV4j9BLN1irybewqA
e3+XduwrHlSe81t9U2b/+XKD67WM5OfTnkoy8UkYJaac88Vtd2WAnGv194QN
vCuG336BLVu38Gl/85XOWpBnJ6DM1rOy6wc7v4wm9auUv5P6VlBn6ln/G1+Q
9TNSv0q5ktSv/n/z9796V/hWEV86s5UP2rFKxva3xZA9fKkglMOHIzbnCwOH
iyHWNdxolZUAfJ1f/17oLYblr8fz+s8TgN3TwFfdI8QwVr3OYpONAKrvRr0w
LxFB4YCc49eny9pLc67L8WciOMzMt2y9RixTL87WV7H3o9Dy9l2vLHk9R/m0
fuufPhZTftxmO+22joRyUuxQ2wvL5Xx8govmqTQJ/ubTe2AffUXE2gus3txF
9GnKDUSfpvyD6NOU3xN9GtuffdsQKlJCbH0Tq6+/Tm8++X2vnMOiN/2YpSWv
p1BWuTiOO01AObnX5sjySgHNN7MlejHlwUQvpuxM9GLs/6V8+QVnVfr7rL59
WM/b7E+onCUSblXbcHn9gOndsqQppfJ8dDWi51JeTvRcyllEz6X54V5Ev6V8
g+i3lNuIfotPdPTd8v2BFhq/yXhHQpUU50QXJQ021kY/bB7pchyl+GxOd239
OG00SXzW8eo5KY7o3LDQZ6k2ctns8nyWmRSffi4xtNTWRuN0vcYW7JJgSfHO
WYr9ddFeEf97fKIUZ1Zcb/Ez1kMrJL0/GnGk+O4cvdHar3XR0p9/185fLcUu
d+ot/Ax1kV/iFVvDdjFetWaH7zexPrX3WD32INFjcf8+okvangbov/WDBmjK
hJqdBeFCvPOJ8qRt+ob086xeu47otfhJzvJmXqEhcuk1Z9fAeD5+XfjBqsjf
EKn8Cbz8WVue31xE9Fq8fuZPzXWXjNDdPt8d7n0U0PzlB0Sfxeon3Z7ZvjZG
HtuKdnOfCqi9rRHYNmpzpgBHMvYaWy9npiNaNPYyj+bXsuuRypjJ493zuZSz
XT4Gpr/j0PFxan+vltun+ZSF33LuFPYV0HxJLc8BA38+49N6l6iXItPdh+U8
kl/2ZKCbANcw8Xo2f5mNp5e27p6b7can3C/9x8Y7Mn+Sja+z/8/Gv/vdNxyT
K+XTeoExHc+CVbL4NB+/sVTd+/l4Ps1Xd4oIP+4zRYBtmfgs+31sfnlwh6V5
xHO5/2J1afvgqfO78MY/l9+2DeCDwcPJt9KeteLwioG532q50PLk6YM8aRut
T011vXvh7IIufEuq2/v9Mx78+tc//tL2fDTHpc5q119cxeSDsfmkVUw+GMvs
+LuqcDHgy8e/eGvIgCPjbmgi9vvY+o15ZSVPZxn/xS8tAmcemaiH6uJ5vAkW
jbSeYLDZbfsPT//i7AXpATcOGKHUPt3Dn5z5i5MKB/0+cMyIfh9pHyN0aWjh
iPR9DfT5nVS9d+7h1WFHJr+PzT99mejGs47h0XxQ9vl6Xxs18lJOFU7LupPy
bogEUoKjUiyivuMNWYM1JruI4MuE6XF9R1XiiMcun9tylZHtxqOTJiTX4Iwr
xd35bUrovsrvWSt8q+h8F5K1ofqBdhVOfbuv7el+LZTXZVXy1KYGvysavmZW
qCaaI5BeEs2sxLFnvmwwOKGJ2Pth2yczz0nDq+dvPPZXRNOXkbro6a3pe2L+
1mLzeQfGZFnpIIc9qncV46to/Yhd0e5RqjZVWI/Jr1T5N3wr8IF5+WjTfg3U
zeJIb96M77h78bRvHnPVUZvanfZJjSV4+q1uW8rWqqO4f79fQuuHLPIncwa3
vcWxJ9b3UVTURmvu+wT59f2J3zase2D3XBMJs72mZQ8txXPQo2laSlr08+z9
V+/me/dc+wHvaHiTGz1NB92LdFTq6FFG7/du+9GwpTM/YYjxjz34UAspSXYd
2O78HPdi7k9R/d/9Aft7f8nvwV7m+96Q74MPzPv8X/81++q/9wl3mPcZTt4n
rGDeZwN5n+Bs9Fjvp6uIfp7VKzR9+pTOKKqC08z7HkTeN7Dv+zZ53xA+oldE
qq4aMpp91krd/BvN77n8/F7/5PKvkM68/zfk/UM58/79yfsHU+Z99iLvEzKY
8feZ9G/6PBfJ+KPx3QNkfEEIk6/cl+Qr0/yauSkbNUdV/wEfZvyx38e+n9lk
/EERM/7EZPxBMjPezMl4o/ab9pqvSwsGN8NIJp+dzf9k5xcdMr9AKDO/tJH5
BbJc9Sd/Xs4DNv+SfZ7mMRnVgYfb4SGTn85+nzkzv7P5euz/Z5L5nOanti9P
WmSyrgtMmfoANt9wpGXR6hBfPjwM/lNfe4ALemdz4w5H85n8Ni61H93TldUX
qQopa3bef2MQLGdLwwzXi1whzZ94Nmye9ohBPMp2OyfcjXwlz7dLquhhvi1K
QLnQPij3i7aQ8rtIl+kbg+XsXVy6blSTnDvIeYjgzNhbbD4eO58Ilf/ZU5Qv
EHuKch6xxygHEXsM1jD2E/t9bP8xIfaRvD8Re4oyj9hT4MDYC+znWXthKLEX
ADP2gAOxB+AFYw+YEXuA0YcM0ZM9AQpn5wjhrxlfvUPHGF3ib3E6bsmH1Yx9
kEfsA2Dn8wFZKm4juwlBhbEPvIh9QOO/Pso9tL/0FdL+6TMtKGqfuYhyWUG0
X+kxEWQz++WwelXi8o0dV3YooJ3H3lqZyvyp+KBLPmsvKKBtJSPULsjmiZjk
0k+DXimgTT0T6wYESyD6jcaU1hYFtN5X9U26zN+9Mu5rcfBhRdQQqReh9lgM
kzJe22/wVkTXrzt8dlKSwJ8BOcfmj1NEa57O6LNmqgRC4lOrx1goIqtPG9ae
PSWBAQYJyJqrgCr/nkh/XiqBn9b9bfacVEDb83ZXdk+TwvCtN6rcniigAttt
6w9MlcKxJ4Mumch+v9fpDa2V1RKav9gxv+Sd0VN5fqPhyA+XTRzFlB0sigPM
Lojh6HN/z9xmJRofZ/uHD6nHpv1lJqnHpjyK1GPT+Qzdca7/KpXnL/K9Ov40
hohhGVMPzPpfl9Mu99vRW5X+Htuf9En9Me1fmaT+mPICUn9M8xOTTgZv97gr
z1e0qVgfOmCeGEyZ+lj293oo5aGKUHX6e+z6lbz5X/0t/E/9LWUtUn9L58sT
82aYmNeIKItvLe5mkCSm8+V8Un9KOYTUn9J8waxDvgU79cRwvHd7r4buOvR+
2PVuI6kXpfkcU0i9KM3307yUXV00UAysvTencfRC/9FiYO07R6u0Ienz2PwJ
Y7Rp9KMLKefFsH5rntfWVSaIY7mlT79WEYDS4R4/1/Kh2/wSl11NQmzhGDO9
6xYfLkXc+bDopRCPKrTl713Fh6d2rgf/z38bs//U7ZzuEgDLJW8qi4Q46s96
lRmuEugUt6zxKRDSev4JhsdyV96Qc9LhrWrFDkIcuWttwVHZ/H/l7LJ1IQlc
PISZf++T+Zfq/9Fdva7595DzkQzfg7Pz5dz78I6RSss59PvDbwT6BfXlUs5M
FabffCnnlbVpt2P9OLSeR2nsWc+pHXI+ce/tij+XuZSNBqt6B8/hUY67MW5l
H6mcbeyme05f0kVZY8RfvSMDObSeaSu/9PTGTjkPe/219lUOl3JnXMU4q8M8
ynOX15Yb2XfJ6813bbV2MOLQemcr9XgjOzsuZbOJn69lGfIoax40dgG+nON3
FV7+NqCL8utPGuO/O3Bo/dSX6TmOz8O4lH+p7Jw4MI5HefJrTkrqpC7KY+6t
nlO6nUPrZTWzfA4uXM2lfLPo1XabYh7l40vMP9Z/66L1rQbHJLPmdeNRDi8q
P3xmGYfWo47/dcZ7swuPcnvE7pa3e7toPkWV5Z8KxXvtlBM3cdUHlnZQTum6
/+OzTxt9H9e32dwZk9BO+XJdXubKqA7KCStWZIce66R8Ku39IdcVrZSz5sb+
PX60jbZfzs5thR9+t1M26VxxaZB+J+VdPpqu3lNa5e+rvlxz/cU22n7fPscU
pKW1U/Yfs+f5XZVOyijzSnz7oDZaD6n+eI34VkQ7Zev74Q+dzDspj8u8Ma/f
r1ba3tJb05ZFb2un/Kqr0N5tTCdl9cjcLy9Wt9L2z7Y89qx9fjvl7mVTQkN3
yOsdM5pcJrunNFIO7xXk0f18C+VqvW7r02fV0+cNLfDqq7WpifLjC1WXBnXW
0/tNe/dh/wROE+WwrWfXRwfX09/X0gkIaX/WQrlWadEPz8J6Wt/Z9fNAw82h
zfT3L7x/MXLKtD+Uv9j3vaDc8ouOnyE312Y6dlZTbs9wslfs+EXbY9GKN23O
92rk9d9bKio2W/+kvxc3qd+so/1r8EV/18XrVE0RWy84T8O/aLWyKUoPO/nh
Tnk1tjboqbpVdt1xkqHT9OXV2OzZHtsz340RW4/3de7FmmF/jdGvpEXBWSaf
MfRU9uthYkqvW+kE3rukbYoeZzdFbKouw3GTNa+nyXhIThpn0McyfOZNmeVS
MQ+u/LOH8/CsJyofVGq4lGNiBl7t1yaknLHy9wPDIQLKzZa3e//8xoWA6jdf
lFY8wxs2LzJpe8eDJYsPvtmmnond+16t6PjIhcahH4NFj0/gKSO6lTalqiL2
82fDr+W9eaeKhrwZeT/SKwe72Z/JsNhiSK9HJqf3frTLEC0WiIvM+Dn4tTT4
fkCQIVo35lP0Hf1kbBH7wNDyrRH9f7Nl1x38Pxoh9HP5m9Ur7+NnKldGuiub
0Os9Xfb7j1czQUeK0ndZtj3EA3/qO6w0M6XXRXsLYnR0TNGGaGerwfMycKRl
tpmujH97qO53QRk4gmmvYPL/MJ1pL5bPMO3FchrTXixvPZP0LeE3F4patw4b
uyofmib8yf/TyIM6jeWjG3q/hnNV1cJcLhdK9w+eoFJdDDOY9mI/f8tAe/PL
NaoodsyTzPPrCsGVaS/2+mnluinlfoZoWOOF6mB+Ppgy7cNet3p15trTZ0Zo
oOnRHarWb8Dr9xDjsdgINRhkhj+qfQO5THux/7/y+JD4UQom6P6SORnblhYA
217sddea7BojWfuk+lbPEa5/A6Yndp4wlHFIWL/mxK1vaH3VBTJ+KKeS8UXr
QzQy/40fyiPJ+KL1AZ5k/FAOJOMLTJjxwNZrhi6sHOpbbIwqtqQeDAz7CScD
3l0vvC+zz2cXRiaH/IYJzPhg/38rWDjzNE3Rj4aKIbu+/4JZlw38Y2V8JfB7
+iOTCnq/X8l8RDmOzF+UA8n8RetL3pH5ifJ+Mn/ReovzZH6i/JTMX7Se4RaZ
nygXav+bv4CdL9j6z5u1c3auF5qgHdPcqzwu1MFfD9UnyW0mSGnJsj2VvHqa
736ZrF/wP+sd5RtkvaP1QolkvaL8gKxXlK+S9Q/+Z/2jfIGsf/L6G7J+UTYn
6xflbLL+UTYl6x+tj3Eh6xfl32S9o7yHrHe0PRFZvygrk/WOcl+y3tH+pEPW
L8rat/+td5RfkvWO1ov052jEPRrUTvMN/mbcym5tlbePHbHfKOsS+42yOrEP
KZ8i9iFlU2IfUo4n9iEdH9OJPUd5C7Hn5PW3xD6kbEvsQ8p/iX1I2/sCseco
FxF7jrI1sQ/l74fYh5TViH1I38csYt9RRsS+o/yd2IeUK4l9SNv7KLHvKIsy
/9mD8uvEHqTjI4bYe5StiD1I31evyH/2HuVVxB6E/Y/Pbm/byodvpRafNHkC
Op7XjbxhYXWJT3m0hcJQfyv5dR2xx5TsZDl//ZXuqWgnpKz6rPq2cqKcB/ed
FZcukfPSQ9lHl3mLKAdX9N2qnifnNHRieaaVmPLnSx1TvI6KYeTqR+PXRPPh
SX5J/svbUjireHffgst8yJt/tVwhS+Yv3x38TfCVD6FJ/fcu3SuFgFdPvz32
4UNlePSemFYpNDxPnOQ40RSx+RY99CwG9kGmyLzKaLpNqhS+L1I06z3eFOXd
eVJ+5rUUjt9zuGG1iwvDvcvnvbOUYKVpmcer+nMhrcNzxKliMYaX14b4zOZC
/ZY53/QEYpo/uHQ7LHeskvOlqXbXf1nK8w3DOg4EWtjIr38oWP/yzRo5m11Y
YLj/qhgHPAhclJMogrJixQcfrSS435pju9zOimBfcNuAy3/E2ObVfMXBc0Sw
q++AxAe2Eryu70Jr679dND/X4sq8Y2YjOZTZ/exiyo9GXZol5w8TRuk35chZ
M7XhpIvs+xbdHrp7gTUXvui7S+6NFUOumzDPYg4XJt8wnrZvnRg8QssPmW/i
QvmRhvSOBWJQZdrnFmkfcGXap4G0D4Qx7TmCtCfsTlR53FPdlOoHuneHWAw5
b4L+W99lgt5fSFrvP4L1x03QpyTXfo37JeAaZ6ne86NsfWbyW/jM/jf9yP43
0Gqv/WXQI5ov/4zNxzhJ8uXpfjbjE6o8NmhJcWGp5kldLy6ND2vtcrAckiHn
mUx+LsusvhXUeK1vTY0Is/F0Nl+ZjaeznHhn/GnbQXz6Plh90zUvZ2xbtZzH
6tzi8C3l+Wce1bV6nx3k1+c6fin45Sdn992vg+uui/EHpj6O/X42nn1OUCXl
TZVzIqmHo3yd1M9RvkPq5yhnuy8s2ThKgqNn51uvLDZBMwMrQnINpHi9DffI
JFcuLNM0Hd9YKIUyxTtNKrL32+y4/NOgc1I42s3rmEEtl+bnHI2UGhefkvPW
GfcOXtfmwvESsxgHWXs6HlmUYtfOgZkWp99v75LghGbRbIOrHKhIb7A9NVGK
I27/+nRdgQPXR0xodlglwQ0fyptVrDmgtHi0+smjErw6cLX7dR0OFEV61fjc
l2BX39ULHgzhQqCTx+lQaxH4VU2cfGwPF5IyRgZ7+IugKXJmdkkVB/p7T+i8
/FkIJ5wFnnsucmHo76sa1u4CGLTYJLJIhQcflfDo3ekCCC83XbTcmwdOh58p
qGsLoWFn/02bsngQZVls3t1Lnq9f7fvY0H26ABwb9b0SfnJpftvGoozO8ZZy
Zv/ffnvmAGM3EZRk7bhiNp9L9dFRD948Wlsh5yjm+VPI80Mj8/wq5PlhA/P8
L8jzg7D35AMrznNofjlnQOlk64VyZveHWHHG2/XxZhE85nNUto3l0N/bcLfP
iRcv5JxzcDg49OLA+N/TX5xyEsHkvsHjTki7wOMV19tzrwhyHoakDWvtgtU+
Qz1+xIlgYWfEQhMX2ecvjFbAVSI4YvRp9MZtHLB/cvCPWS8x7FRxGnDSzRQ5
312+PdpMClZWq/WHydig+epz26FSWPCtRSdPg9a/PGPvd8jzR17bEqS45zL/
USmuNP8L7xVW3NcLkTMbn2jNdrs1ZacEWv9bL8LU/ymg2W92XXszSYxZNnsf
V/T0pJy/lzzpulsi52tlFb2udZfgnlsMpvJeKKCd6SZF+KAEn6xcG/+pRQEt
OPt8+96PElwRdW7k0y8KaMCC7bvFDWJ8IuLLveL7Cqhk6d/A8iES3LjqSOmP
swpIL+vc+KcBEvzy5vTELdtl6+MA9Vsx2RK8E3us8ssRQdap6Rdd0vnYzu+M
8v0nIpgzYsHOOls+/vbkkMWXxULoHh7gcWMGD1uOPr5MzUoIjceu33msy8fx
8wbNa7ESwbYtqo8+6vBofBlZePQdHCei7JyZs6SKK9//9zj/ysSU3ULKR7K6
uY6rkrP17SnV6zSE8nqcUU9Wz+or3x84Itt7XcdxORuduP7+5EIBnr08a+rt
oSKaP7B3uEOJySkOZCtZ6lcHCfGbFq+3UMkBDTxfU79MSMfvATJ+MTt+k8n4
xT9z1vlWXuLQ/X7Z/f5rhijk6d6U8+fDjvePtsr3LxtKxhsex4wvNv/nIzP+
WM4+ce+L9yoerHbyPqKtK8QRzPwwmswPeBgzP/wk8wNdv2039q3uoSKinL34
18Wem+Tc0BV8s7RIRPOvjb9/qVl/U86aFwe/rlEVUy55y1M4P0GEXS8ceOr7
XgxGUTnhS3XEeMrZGK9uBWJYMv/3+OK7IpxV1HzMZ5UYGrufND3cTYyNrL8E
/F89QmU3s0mnlUW4r31qw90mEYywTfFLWivC57emhH105QGuSikIMhLjabYX
8s4ekz1vuvSrRYMIK5VblK/P5UGPFftaW/qJse3kyZo1bjxwfZNsufGGCDvq
56q29edDvxmRfIcu2fsO7V3h8YoHm7sVxrr1FeMVPVbpl83mwbzFQ5WN+7D7
hSqg36+P9Q8QSSlPfr82s/8jOd/86Dbh8y4p1Z/eJ/n8Vukjpftvn8rkzilY
KKF89mxDaVysnMdYfZGGLZHS8fqQX5pkPkrOm74qu8V4Syg7/Ryw6eR1GZ+F
h67aCuhbz8cT9syXYpWQF/ezMqSAU9x09sm+72XuDIUN3aUQfe/4+xWLJHjF
zOp45+lSsJir/HNtggSv2vuldEG4FMys9a5NWyo/L0LRuvTpFgsefuapmXxq
CR+y4spj3wzk44kPoq8tzOfDyK41sVFn+Nj2nOtM/IgP/GMHe2ZyefgYsz8J
u18cux7zyH4k8v35yH4lNH9COuVW7JN3Avxi98D2ORk8+Xhj+hNnpXJgxkYp
5aA506vnL5BQDls2ts3nnATPr8MBPWR8T8GtbLhsff5+8eW0aA8xLNwoqtmx
QYrfzL9opvZdDBM2n+56LPu84dcLMXa+Yph1M+oTf4nMXk4+Gi9IEsP4HXvK
C8/L7d+aXqbtkd5ytu+QjnW9KOfr/ed7aq+R0viCAT/j2dFoPuWL56712mYp
oKwjyly4ZR2P8pYuXYU6dT42vsIzeF+hgCa8njfa2kqAI4P6jrN/oICuOLyZ
Wh7Px2XN5yuVtiqgbvO/i+3sBLhs+9i7jpdldiM/sTBLiYc3j0M++WYKiKdQ
WaEXwcPzOqJe+VkooIj+iZedT8nnU2urTTbr7Hn4zJktR9VviiFw8LOQnFB2
vhEDWhGvW3Vczqmch+ObVAV4TNry6ftbRXCraEKC6JZsfnw5d7d7bzFk/vz8
ZdVVAZ6gtcje5oDMf8KLlPnJQiw+EDEpOEG2Png4v53TU4T39PCfavJZAa3q
HZhvf11Ix8uJpZd33Owuopx2cptucLgI2w6oMVpTqoDu+cwLrXQU4h4D1u/Z
c04BxfksXqB9V4A938e5zTSSQq/3M4bP/STAbdy0kq1hUsj7W395TaEA+9u6
ZjcbS2F8r4MhlXMEdPy8se8Zo/5QztuQV5X2cAF2XLFj5AsNBaS+9lx3p8cC
/GB0ZVKkzE+rTTsvWPRCgG/H73cI7yuFpW4Dy0e+4WP9hydmjjovBbeE1+q9
nsren8AnzbyGS+d31n7vnXnQTO2enHcbT3ccYS/E340XXlW4x4PQp9JZqV5C
bN2+x2piKw8aiu/XHURCHNJYqRZrwgedWcIwgez/S8y55x8lKqLYTU+sMrS4
2NhqZsvCFkVkcXh9Sd0tLn7bdCVmZ7Mi2lHb8PXTfB7un3Pked84RZQ7w+Zo
kIiHhy5J9dx7QQmlGHyd866Dg90besRNmKyEdjfzPkMyF3cPsEFQroxUvp+c
va2Jg/sVFWd7jFZBZqd+jk+6y8Vetzxf7rZXQdvuql+18OPh7Z/+2FmVKiP3
ldyvLyz4ePuSuIpXtSrIfcmpzftk3/945P2Pn0NV0MOERceXZ3Lxm7heOulD
1dDEij95Gnpc3KKHX9rcUEMnCgaOEgi42FagsvmGuxpSXjl9l8ozHp7c7cX9
debq6M2AN7WHrbm4tmX3x7Y0NXRsx+rbW4VcHNvQe2n/6xoox3nR6DRf2f07
6e47/UwDuY0oCgr05eEA7/gtH5w0UeSPOzHCQC6ecdrbbLKFLvralrV+yUAu
9mlVXyd21UW82aJ2pxAevrnWJf7dd120aWVs2Jl5XNyVbnzMNFcfqdccG3i3
iosT2xNd+n3VR2lnVwU4NXDxgIyB2rU2Rmj941/CiO9c3JHt5rLU2Qj52t+Y
nlTPxUqxpxYaLxZAzz6t/rEP27Hd4cbFu5YIYKdP+OQtfTvxL/v525LvCiH3
0QD7CQXteOCv7Q7rPigiuwpp73eTOPj9kLINkxcrIcW9w1ySnDk4LvKCelKs
Ijrv8nzLioeduHpZ/ZI/PEVkX7zYtGpXF+55Slvn41ZlpG2woDa2Lwc3nFkz
+XeAMhoVvyZIYUoX9h32MmG5mjJCK66WaFpz8JKo6Nfn3iqiw+Z+Pn3K2rF1
5gybeU2K6JKxauyn5x34yhmL8LN7lNDVeeuL5qS2Y/WXV4wfDFVBp5eN2LXL
jIMHvfhqGxalgs4tuRlZa87BzfsHBN6yVkE936DhduO6sDh5gGDbQ1V0g8e9
ENmLgz/5BY54XaSKjjq/fbXLpgunLj2X4rJIFX1dFPMtRvZ9aeIkR9ihhjY4
5a/JsJQ9L3+4sW2NGpq9p3B8uQMHf7xr7/7IRw3l1j9KE9h1YQ1krR1uroHi
fnsnBE7j4MP3S5xdjDXQrLr02krHLvw5wDl4fYQ6urahbk6wrP0CvgcVqO9U
Q1stenbbqtKBLZ1X1eG5aqj5osQrrE8n3jSg+w2tejW0EEdWcFrb8e/0S/eV
r2mg/haee7ct4GDd5lbr5DmayLD73XHHt3Cwtu/YCcH3NZCe5tSdE8Z24fiC
szE7TmmhxJvpUcpJHDzvziRF3hQt9HHcil23PbpwYf7+uvn3NVGtSeMNzl4O
vn4kbY3zRQ2UafnL/mh+Oy6flWnQmayBrmU3D/dX78Taa29rR8/VRBDKG2eb
0Y7jX2Gl4k9aaPeK7a6bL7bjiXpxS5/+1UIdQZn5lgadeFnJ2OkfU7TRc75/
Ffd0O0679bYr4IAuKrtjO7nfyy58YsYN0xcRuuj5ROGnEa+7sPkng23qJXpo
9pDDorOqHAxrOkaNDdNDE3z7z33Q0YXX+18RDDbSRS3eybo1R9vxEl3jrZ8G
6KK/b+c/HmvfiS+Up6moK+shb+e+575sb8fuLT4J387po6c7T/a8YMvBgp73
UYGuAQr41HoseDYHt+5WtbmTbYCy+/6JEN/i4ITiE+LX2ADtHLm9bebFTjzm
0K87PWYaIMHuvtbafhyMVbtdOzdNH+2ZKh63bpVs/JjZ+t5cqo/8VR5xfizq
xCOupkpUHA1Q60XPgp4L2nHcC6XggUZG6OYfyaStsvfhrDWla8xLI3T048uD
cc+7sBK3eNCKXCNkM+Rg0JknXfj6pos9fpYKYO2C063Vy9rwvN8zt+6cKoSv
rr7cz95tuNLhwT33aDGU+4XeDF3Thv16vfydt13mf7zOfGyt1ooj6ve6vFIT
g6FE4tN3exveN1ElZ+04KSRsCjbJ7mzEIdty7/5SkvlTqs075tQ14lT10xri
XEWk6DZ80rIPbfjgvpkdO5YqofEFp6xybrThTU8uPmj5ooh6uA+/fft6K54+
Lfzgu+XKaPK4Fzen+LThmKobT6PeKKMHGTP8Fqi3YqudlkHjTJTRlfBlfyQ7
2rBNyCrX1fNk4+VbVnfLT2242rzZMaBTDeFNqXP7P2jD+lNPW7Z7qiHTojZn
y5OtmPt25vFuEnW0MMMyYEpwG76X+2TK9Rh19PLYlMtPTrfhbQuKo8Mi1NDc
EX2fzLdqxn8Gtj19/kUD8X7aTr65uA07x8XZ2WrL+ufAbdZu89twn1EtXuN7
aKFDUCKabteG9zzQj51sqoVWVjtZvZZxl0hjtpOdNoq9+niqqbQVq+msavkQ
qYM2hFjFC1604il7KuCmrjY69WJgqmpAMw7xa7rZNlUXxTh3fJmU0oodl/LC
dfvrIxh+PPjt4FascV+YElNjgCbeHe2YUNVM8wVUid6P/R6867an0RAVP06z
eOTUjusm7z8Zvd0IPUpc5FYxuB2bTfXfuF7JGFUGFY1U79eO3/i/s4sJMkIV
2lzvVXbtdP9qTOIFOKby+A3V7sZojOc8UbFpO+ZxdC4OCzdGP8yVt6irtGPO
ZK2zK3RN0MQh6XejctpwimUwDH5ojI4cfTRs9k9Z/1rF3/ihq4vuN6t14vG5
3LIuEId3MxZPr8LDRma1l9d0gVJKr32+D/7gUWEvOsYd5gJHKtiTcLASz1qZ
sb73NQ4ULrQ89W1MNV44oI4fuVUKW1xOW/scqMc6qUnj4wtk9n6nI7d0dz22
L0/I+slVQNr3C2yKR9TjQVdvb9vaLLMHx7ts0xxdjw/bBNk4zpXZj01vr1bY
/8GtZ3e/mNugjF7pOm+x2FyD11UUHpPaqqEFOdeLx9v8xap954wYxFFDD9c+
2nx2XgOOme/nO3isGlJ1thp1za8W97xUZhL9Qx119XYt4njWY9+MPS6jstXR
vsd7h107Uo+tLAwT1Fq0EI/30XTK8gY8b8T9o2O3aqPlZzWt7nXJ7u8J+i0J
0EHce9f7p5fV4du7TMzd5+mjpdf1H3ia/8UxD+w8t2gZoGmrx622HNOA+2jt
3S/ea4AWJfefMMGhHhvkT8w12G2AHtz+NGza8HrcwsTXahb/i6/h87VR4/08
OXR/3IQD3dO4t7sonx52yen1LA6ExAYY8xzL8Izs5OkHLnbBtrRTGwq2fsTn
h+zZqzxX5r9P++kmOfAZDzGf0T0vpQv2pspGpflXHHpcdGKoBRd61xSruC0t
xRev9eaYTZFC3W2F0QFXfuLNkaPGJ3UqoGIVY9U5yhX4c6Z04Jt2BRTrXzzb
QKUCP5+4rCn+szJarNk97YZNJW768HVj+VkV5DH4z9xpRRU46MGLqA09ddHB
g4pjMpN/47PdBmwMuaSLPooO2j1YX4GPM/HTgyR+iucx8dHjJD6KRyhP2m3r
zKH5ADuixto9Ot1FeejZXfk6HB7UcQz35KgW4TYm3l1P4t04mol3/ybxbvzF
ovJm+1AOpN6JOZ1yJhXXLa6Y4XGqC6xfB70QHgrD/XpeysgYxoHj3//M3v74
Ph77w7/rTaSsPf8cOb3Z/xnecis8SmaHwsiI7lf8Fl7Dy1cGB2WtFIBh95/b
33oX42Wq58fMGyaAG8vyL+ZdyMdLRnO9uIYybi1S325/FIffPX+t0FoAWmEF
I954PcMRf0863SkQwodfTjfvqcThX6vb/xT0NUDLlzzdN6MzArPxcy3Df/Fz
7LgyaUeDyBhd1q2Z59ztHWbj52Ukfo7Z+HgyiY9jJ6b92Hg6234sx2pcOzj8
HQ/+etpeTY++C2x+RTeSXwE0v2Lwv/wKCOuT81hrHAe8uavrExcUweCBPudG
xnXBgC+6UfFOH8Ble/3FbmM4EG/cUOO8qxA6UvSddM90wcYPPSKrnPMhJMxG
M1mHC8qb/c0/KRYDbZ/mf+0DtD1+/msPOM60lyZpL1jMtLcJaW9YyLT3YtLe
cFpphl9tlyo6tmdwje6403Ceyf+YRfI/IP9Q1wqN7/qopuNDuP/ot8Dme9SN
/pfvAUZOG8+t/mSESj6L30f7pkI3Jt9jDsn3gNM1BXq31E3Q7LHNmZITV8GC
yffIffsv3wPYfI7LJJ8DzjDjl80HiGXGL8t7BB2Z5ls4MO2r9qdE4wqo3tD8
/PRzWX/jmt1L3fgbbMY/vDlnMwfMl4rtr376BXV3F6hr3+uCHrYbksIbv8Od
irjFH/ZxoVf7hICPqpUQx4zfPDJ+oYQZnwZkfEIjMz6nk/EJO5jxeYOMT2DH
5zsyPqGiff7k0S5GKPFA98KHE2WsM2bvtEZj5Bx69e6TyDL4zOQHxZL8IGDz
f/qS/B9YzKwfbD6Bq51e9OjuHJDqiJY0/qmHdYWfvSu1OFC2sKIo1K0OoluL
opa5cWHY1bdD9z5pgK3MfK/T/G++h8KLyYaZpopo3knPXeXd/4A7s54cIOsJ
mDDryQWynkAjsz68JesDjJzQuq84SxW9vFZ/f93nKnAZutFba7sqOpJm19fQ
rRp2MuuHCVk/II5ZL9TJegGazHryjKwnYMesD6VkfYA5zPowk6wP4L0n7FTK
Tz2kcKR71tRVf+Apsz6YkvUBzjDrgxFZH+h+kgdJ/ha8e3I4bO4VQ7R63ePp
anerwYbJ1wKSrwVZjD24iNiDMJGxB18RexC2M/ZdMLHv4BRj3ykQ+w5OXr9V
XTNbETnsff9un1sj7NLl5AlmKCKPUnz0eI8W0FyQtyb0lgKKb241eJzYCNcY
e1CD2IOwk7H/bIj9B4cZ+9CV2Iewj7HHrIk9Bs0ZWxPHqGmgQGWHVxVfG+F2
XcJJFw8NtORE09uishbYm56z0ueWOjp+bV3/PYObgLUPZxL7EDQYe1CZ2IPw
m7EX7xN7EZoYe6+G2HswmLH3HIi9B+6Mvbab2GtgbrekXcFPB23bcO7Ty/Im
kDD23nVi70EUY8+lEnsOktXrNL6lGKC0bza5O8e30Pf1i+T3gR5j32kR+w52
f4MdDy8bIk5t7tfPxU3A2ndviX0HLYx9V0bsOwhl7LW9xF4DRS6x1yTEXgN9
xj/vT/xz+Mz44y+IPw6mjL8eSvx12MqtXWoxRgJPTL59agtth+jsb+unnRaD
RffOlpSbHVAZZhjTulYCvs22vecd6oQc/ytnFc+JAN4/slh9qx2WMv52EPG3
gfWvLxH/GqwY//sC8b8h+71FfP/nykhdenfi/JXtMNnzvXKKmzIqOB41ySqo
A8I3hqqaZSsjjxtKU4UrO6FRq2pqvxIlZPrn4TvjmHbox+gJw4meAAmMfhBL
9AOoZ/SDoUQ/gFJGb1AnegOoMP5+FPH3oY3x73sT/x7sGf//DPH/YRfjXwcQ
/xo2Mv70AuJPQ2/G324j/jZ8fdUQXtFHA2ledr6++W07fPNr9m2RcYpRWm4P
/U4oXPL9sO9xdRTaGirUrGyHVEYfWE/0AShj9IDnRA+AREYvmEf0ArjF+Nc5
xL8GFcafnkr8aShl/O0bxN+GZ3jycO+DWmiVwCjo4cV2sCs9+v31ei3UP2Hq
seMGnWC64dH5AQ81kbDwrgSlt0MVow/0IvoAsHqAFtEDQJ/RC4yIXgBJjP9+
lPjvsJjx1/OJvw6jGX9eMfifPw++ouhRKZ900OjXSvGbjrbDvOzCmX7PdNDs
7uPdDg7qhOJVf5q6OmTz45YdIdFR7bCB8ddbib8O0Yx/vpH45+DN+O9fiP8O
vglqi24O0UcrPt478lDWv/7MNvq4t7c+mqs4zt5jYSd8G+3SKnDQQ/D5hK9H
QDvcYfSE10RPgKOMnnCP6Ak0nyeN5BNTHkLyiaGQ8eePEX8enBn/vYb472DN
+Pc7iH8Pg9XGTRPnGaAzY1cO8Z7WDiMm1A5NGm6AnHtZ2V6T/f84Rm8oJXoD
KPYiesMJojfARUYPeET0APjOxB/NSPwREph44yYSb4R+TDyylsQj4aH1hqdj
BgshdkhDdPcBAjidd2S9or8QjK0TW1Yd5cPtV+scJpcKYYhtUGZyIx+U1EIj
TvaWQkCMd4NRoQCM7ozzKD8vAZ/mm/1ezhaC0917KoNTJPBjmXf6lwV8WHnV
WmORpRQ0Z7/PUHjLh9Pnz2jvj5GCi+v4+zYTBRAwU8P8vLoCipyc87X8oQAy
LPgnG10VkG5FQt7hIUIoZ/Tgy0QPhm6MHtyX6MHgwOi96UTvBTdG7z1A9F54
xejFe4leDJaMXvyS6MWwbO71rA8vlVH1pEFOkxo5YKNjLeq/QRlNfz80OT6J
Cy9Tus1/KOMm/3vqJz154BZZB0qvZTzK43dPCz6IBRv7fLmvhJbqeV96Lfv9
VQsdVqkYKCPr5xX9LWW/35PRm9WI3gw2jN7cg+jNsIPRk12JngwPGT35EdGT
YRmjR+8iejRsYvToOUSPhmnmJQOwkhoapLBuR4YaFz6tm5i6PVEVGXsd3Tjt
g+z+3/kGVP9QRYUbc/vHpPNgb58CtUWKqmiw3hH3QA4H+vbQdxzlr4r2qxrF
wjsuFDD69WiiXwOrX4cQ/Rom/levBlavPkL0aujP6NuqRN+GxK16tnNtZfNP
dNC5z9O50LyrKX9Lo8x/3jH2ytrRPIhLNDfWX6+OZuRGjb86nAvnGb07k+jd
sJ3RtyOIvg0WjP6NiP4Nyap6BerjtdCjbJN9mVlcuLX8/NPmMC00myPeYlHP
AxPRiOqnfzVRLyeXx49k72M2o49/I/o4pDJ6+Fqih4Mfo5fXE70cvEyaBUNk
9liE/R6vjhguROX3Hua9Xg99GF6nt2E/FxTvEP28J9HP4Qyjnz8i+jn4Z1/e
vPWsARoDFyfZyN4fq6evIXo6tDN6+hqip0PP06mzDmkZozvGV3YV9+LDGOWI
+C2ThBDXw1R87LUITD22dnM/KYSAzdzdqwzFoBpSHnUfC8E2pCFxobIYTs+O
POW2TggXHw+78mKpGIK+jBrzbqkQePm3xxeHSWCIZ4RbupEQpk1YPLylVAJ7
ZrltEvoKwZLfap5sKIFA2OSC4oVg3WBe3TBZAmIVtdW2xUJITr+jW7pXAiWc
38t6qYpg3+UwtYJ0CXiHzTJZ9kYC8ctc59rJ7uNBul6l6QgpdBxQ6vPHRgSG
H9+lFydIYcaVvMaLkTI7Ya/xkCGTFdDJd5ppq5KFsMLKdOktLQU0Y5/a4nU9
RCCMcdBYeEkKenbKKptk/5/UZ69742wprE26n1tWIYJFLidiLRSkkHU8eduN
If+vq++Ox/L7/79ViMpWKokkklGRhJxLaSgJDaI0KIpIhSalMiKVBk2FBiUi
GtRpSlkVSUKhjFT2vcfv/jrXOffv/fnz+bjWuc58ndfreZ4vAZBfcbF9cY4Q
MHac1913SABeBCzdqbpZihqr0PL4ebZ4/nia5vfcUIrq9J9ZvmUyHzxMTOy+
yWRQGh8q49hJfGA5pmXnHX0patzXHaekuHxQeMlsINtdiprYrHxOfq0AMO7X
lz4KZ1AZI33mad7mgYfHdyUMLWRQY56ffntfm9YLmq9OyUHVJd47RGAW665V
n78kX3nic5XzMZcleILO+fU2vgPi/Yfmi5V/hTB53onpbxIHANdDNbFBQwS7
pfdosPwGwDyZpRrqHiIYXpwqpSveDz9YoG3aYSqCFyOfHXn+ZgAkxw7LWioQ
Qn9aP9Mc6WfCo7R+5h6knwlN/5tPHn76bz55aEPnk7+L8slDzMfE5a2m+ZfN
iH8J/4cfBDE/SAXxg6BijpyqmisTbC85uduolgeuBXlb67AGgDC64/Kcgzxg
SdcP5nueo+sH4+7YPT0TyiUY/jSqmbxvACTtMIiY/k0Eesc+9ZbaMQDC9n/u
2BQjAh12AXf5GQMgKO3oTK+XIjCRrt8IVL/g4n/rF1yl6y8R1R/opevbFtU3
OETXdw6qb1BfMfkk59YA4cdNvemvaVcnwX93/1w/SYYJuMOeRLuJ17WmXE58
ngkTyLxN9ygOEu9DU+zL1ngziT4d1s9s2O/7bUe5EN4xgzpe+RK9XL9YKe8b
HRKs/31++p8JTIKnHJq3UO/QANHjiojQi7doHwA8rZd/fUUiMOzUGP8ysR3L
Lmv1kmsVgU6D841tOQNA4DxcLvGvCMh7O860rR8AjaNd863F9VVF8wN7ED8Q
umTU3fxlJ553o2doLhW3N+brjLQ62D4rUAQPRFLTljdK+FzhctdSTloQ/iA8
RuuL4v6D9UUbkL4oVKHr47/6tkzQguoDBPz3/4Hhf/8f3PtvfRG+nDviy8Gt
ND8O84We0Pw5jM3Ze4FWsySfNP6/ua8j1yV0/H94+uusWDc+vJ8ZdODmVPE6
vGqcvks1Bxa5/rhgm8oEvoLj9h2OHMJfKneo/r4ymAPP24C9/o4sou8ow+W9
2VfMJPkc8fsLJh+MlGZx4O60Y71/o9nkOo6fK4bv9p5QxiHYUdotb3WshM90
KWKjwfiLPIJ37xj185MRD+7o0Gy5YM0HLybdXLYzmg9ZtRfU09P44I/6Vrmm
nXx4ZN5YSmopH4RFtJvZjuPD4Q7RnZk2AjD1lfWCjVE86L3W5ohbBx8oyrYZ
DznLg5/6jnpNWSAAB6+ayn3s4kGFii3FUQViO3CExZNXxwSwq/5C44YWDmgZ
u/XTlVwB3HmnVkvtHQe4HjNL15wvgHusZQLsAzjAcUDa7U+KAJ4uWC143y7+
vxm61zVPi+/fZm/B0eSA4903nCLCBfDPUf9ntks4YNiI8prXdwTwgkpAaWAX
G+Qml7f0OwugX1bjwUzIAmt/ZwW3JfBg3+wNyhaefDBgZ1szfz4POnh/5Nkk
iPGoAzfbLHlw4bpXC/5M54Ne2cDu89+48Lvf4pwxowTA2KPd844uDyb1XaN2
WvGB1qrHxVWuXPg/8w202B/qYZM5AIrqE35ceSmCXfT8E4LmH1j33/kBGvx3
foChB3MzYkZKxgvm68kbm31/oivBnEtf3IMjJfrLVYJzFZFQjF25b/+G8ED9
yXeFhgtE8Fzbtrvhc3lgBEOx188G5wcfQW3ZEZCiqyvJj1t8pbRjdZMEW3/t
NvaIF5Lzf83xZ1qKtwjh9tacyu2LVIheDisi9435JVWCv4Ut988Rt5/Govm3
IzZwoaa5kWNgBQd4DNWOnfuSCxuH8e1WnuOQ/ovKzwG5H+5XNc/nEj2hvLdf
720bySL4Qg0/ITGfBdlO052iVYZSWQ5jh3xdyYZ3XzaMGvJ0CLVo07PIFhEb
vqLt705kf8N5tP3dhuxvyKHt71XI/obraft7ErK/iX5RiLO+/ps/TIJrN1Op
yRksoqcV0S13pyGYLdHX8lCvDTHhEDzEXDPoTh0HBhrrLf5kK039+vxiZnyC
uHy0fV2M7Gt4gLavLZF9DXVo+zoS2ddEL8nm2givH3IS/Op1lpFHCwtOU5gY
NOqxLHVq3Qa59UZs+H2qnMcRZ1nKYEq82S4BG/bT9rNM6KD9DLH9vBzZz0Rf
KXnalddZbiyiV/OoMdVkPl+Sf3tevF2H/0w2wbPMPgQM0ebAV9qs56Gv5Kgj
h+cd/5zBhnm0Pb0e2dNQibanxyJ7mug1BT1660B9YBG9phrnzT5+E1jQsyja
tchGgbpcvyCn/hsbnqTt50pkPxM9p0++Hw5OfsQi+kYDhrOsH8hw4PNjYJXT
ViUqLLpj8uZ5bOhN29NjkD1N9J0q05L3zUpiwWc+LYtveyqTfK5YX6NiVpBO
gj8Huod/FP29oUJ5zy5+tWc3m+htDfw0iWnMkOhDfWhzuQaf9cKjy37eNo4V
r6fOQz/u8OqDu0eG/XEbxQQ4/ylefwrPXZYpW9xH1gP3FfmfP/P64JT9jL8/
ronXv8EFrw82X7dKcLFiAZxPdXKV6pEYIR8ozMnOOvK6D2J/mxbyt8Eu2t8W
hvxt8Antb5uH/G2E7xax40Hnv/BeGDn8WY7cChH5HtYPiAFHp5+910/wcEou
+1HcAMF1k4aMyXnQR8bnqUnrh7W29cI0A4eT7N1DqCmD62U/0b+7KKpWiHzS
R7DFqA32Z69Jrt/KC7r4JHgAvr8y7/WTGUOpX5s29Rgc7YPGu94Uf8geQmk/
WvuHH90Pl9L+vhrk74PxtL/PHfn74D/a36eJ/H1k/J74Ytc8dr0EHxkdtezr
1j5YHDFhy5wnQyn8/3h8df+cuWupQh9kLq06vC1clqpJ3gw9FfthLe2Pu4X8
cbCY9scdQ/44Mp6YDmuzM9/2wqbuskt6pXKUbvKwHJPh/VCP9p9NRP4zqEL7
zzjIf0bGR9QQqePhKb3Q/XDQnj65kdSa5y7j6zX74Vra3+WH/F2wivZ3rUb+
LjKeIsBp03vHeqHfjJvbps9ToLwyQj3v2PbDBtqftRD5s+An2p9livxZZHzN
/lXJ4G7shYaT3JyPz1ai7pSxVY3C+qEF7W+yQ/4moqdW+nbXlE0OvUT/Lj5/
7u6M4/3Q3jX/stEKZWqFxrvsw5R4fKy71gbF+1qcnxfzXf9qCp+7BnVDazp+
oz5qMH4Dj9PxGl0Ur4Eb6HhOBYrnkP7s/mauZZT8X+i1wXPhXD6fvB/3180t
KXZ9Q7uJnvX+oaeYYXVdMOSTMevHAQZ1sqLi6NnELriLjk84ovgEHEHHJ+6i
+ATp7y/ddaQ/TvoDH9PxheMovgDD6fhCGoovkP7g1ndd9lHEHzJ/bmZM9XAZ
2w1NpH1SqlePpNS+33W53vQXqtPxggAULyDtOe0sd3iY21+4L7hv/8UzI0n+
4dWnZjjdm6NEZZ7jdN141AXv0PGDOhQ/gL9ye7cMu6hMhauq74qu+wtxvECE
4gVkPhw2c6XxA6u/sGk8MJuTrUzej+OHLih+CJvp+GEEih/Cm3R8UBXFByGO
JxqgeCLsoOOJM1A8ET49NWbL6lwWwPmAuR6Ma2vvMgleHPk87JeakOD9bjP5
f0/ziP5aywf5cqqEQZ2YZ/EzkvoFi+l4nTOK18HXN+36rzdLkXzDWH+HcWXn
iTFL26A5HY8LQ/E4Mt6lT1+Mfm/WQvQrM1vNLeu+tMJnQLFSkSVH9A2wXk1r
XUJn/d1WOK9bX/cRQ4Fcx/nkLr56bdoa0QZlhiyeYz1Vgcrp1Pwtkyy+Tsfr
hqN4HcwzmFFQ6KhIylv4jDPC5aQydXjSI6lTI35BHJ/zR/E50l4dG45eLhA1
wyQVnZ2XbimT5xvpeGoiiqdCHE8/hOLpEMfTLVA8HeJ4uSqKl0McXy9E8XWI
4+vxKL5OxlPQvO9rtt+ohVui714rCuUCrFcXS+u3DUP6bUS/cNeWVr2G0w1E
73NJskWT292vsPYmb2Rb9Aii94DtTwt7zV2zf9dDHE9X6B+MpxN+xTTErwCE
X1EyyK8AmD/xMGGQPwEw38IB8S0A5lu4Ir4FsNaePDlWGedve170g+ZHuK8a
5EcAzH8JRfwXgPkvmxD/BWB+iwLitwDMh6lAfBhgSvNhdiA+DPCi6+s4qi8Q
82B658ALGere4O/XAIrW7+sUDOr3AY7qBe+ZW+TIdXz++45poNaP+K9Az9is
8sqMkeT6L9eMYQ2nFCn8fqxX6v0i5bhbWjlQovlVQxIG+VXAjuZTNSA+FXCj
+VQ5iE8FLGn+VVfGIP8KDPNE4xXr45XQ4xlj3D/sUf8A9TSf5yDi84DznhWF
kVwGhfNV4/W4WHV4bIxFM6jLcIoLWilNvY+zd3q8sxEco/UW5yO9RZLv6yzq
P2BgxCKFrzKy1NRjwQmPdzQBn4AB/54UGQrrD+LxHKCRNj1qZjMwywgo4t+X
Jd9PpvUYHZAeI8D9EfMncH+cgvoj0adaNW/RvBfyzUDxrBHr/skRRC9wzj/r
kEnLFKgIzeMrn6k2AJV/4FNMpRI1UG3dd2hWPcnXFR5YHbTn/BdgqVG4zX+6
EsUuvxTlu7CZtBdMW/c8O74FRD1rMXotpUL+B+vBnrJxtW468wOcsjc+6WLB
JPqGeD28rcfUgQEdwKtoCs/5i4Dk455F8902Ib4bKD/nZTVXTYrkt8bzpQKa
L4k+WXBqwdQk605SnxDNj8CD5rOlIT4b2Ldg/8ZRo4eT92F7ZiLze1n8ld+g
hp5PMV8Dz6eMb4PzKUiqcHsB3UZSix8I/uwRtAMNg5wPmbtHUjbyv31FX9rB
Wnq+xc/j+fYGmm+J/teNxzGBweadYBTNfytF/Ddw96PlbIGxMnket8fedVbO
19a0gbWRAdWlnVhPuwdgewXn48b2SgeyV0AEbe9zkL0PGml7HT+P7XsvZN+D
MbR9/xXZmyCI5s8aI/4sSKT5s/KIP0vas2DRrs3HPHuA+0Zk3+Dy4PHmhuwb
kj9nA7JvALZXNA//NShs6gGTbLdknKoZQv2bEiYodesGCTR/tgTxZ4EGzZ/N
Q/xZMj7Pu8+cfHtBD4gberDbzWkYyR+O+0fuAs+RHc094PyFB3MMvWSphKVd
1QHzusETmj/7EPFnif7c2OS8dTrbe4h+nBOyh8Bumh/rh/ixIO+twvjJ8+TJ
9wZiP6W3Wo+kZC7KbFrxtRuwRiC+7DHElwXGwQV7RixRoJwn2vxa4d0tXucc
c0b2KVK4vvD4+h6tH/Z6eDfRg5Pe2/57yexeYE3bq0bIXgWXd31b/K5YieQ7
x/1lWMWFPnN7Mab5sULEjyV6cqfOeO3WntALrtB81zzEdwX/s38iOBrttwiW
Rvst0n4mTuOW9DkzQTG9v0Ln7ftJ/ktLtJ8i+C7aTxGchPZfoLbE4G7ZiKFU
+LEE/RMrB0AbfR7CCp2HAJvo8xD26DwEaf8vR7i+feOYwIrZtHbPPGlqYlKg
zyXTAVBNn184is4vgLv0+YVqdH6B9A/7jIjcZC0m+Hg278SaOFnKIC7iupr4
+WP0+YSF6HwCqKXPJ1xD5xNIf3Fau6zvtXgd5ow4bbC1VY5aOf127m/XAbCY
Pk/wE50nAK/o8wRd6DwBmX9O+4/ODb3JBJp5Jg//aYwi+dQxv38u4veT+ePZ
v587hBpMgPn4uxAfH1jSfHypvYN8fKIvOGr42Gk78phEz/M82v8Q/VPZSs3v
zYYcsJw1bWn7JA4InvMjbHEHB6zepTjsqDQHJMwbareCwyHj/X3xwzFMLy7B
4y45apbVSvCWoCbtVFceuBz8q2Sdl4jkUwlv2fLg02wGyf+M54NOfrafhaUE
q6N8QwTPR/mGCD7/pDVh6FA2wbU7i7pcU9jgjrqz55oUBhVwX6rS8hoHiHY7
/5NrYlDqO4YMXNDlgiDesrS05VKUYdnZN/tPc8BU15DK2cOlqAKthdtXaHNB
mvqWwP7XDOp5ko9p3U0uOCA1tM3jCINSfG5oO8qQR/r77YMFe19lcgkWTPpx
/vFMrD8yjLJG/jaCpZC/jeBjyD9H5hcz5L8ieBryXxGci/xdJL8nD/mTQCbt
H8L1if1Dj5F/iOTb/If8QWAl7R/F7ZFG60VgPQzcH1YiPQiClyM9CIIdkB4E
wXZIX4Jga6QvAZyPuuoGzeSApIGlr+UDhODdZ/UcE31xvf+7pLwoSwjWyZ5z
SVnBAU8njs97+FUIzpjqJDwpZ4O+Rbe6Pq0QghDblTfPctng8+o62axDQlAb
dMDPeAkbKMhPinBcKe43Ztust4vr7VyjWuuYBiFpj9MR6mPcoIjgV2UT/C19
JZg5dgocqygCX+j8CTh+g893/vnXmO2XxCf49qINwuddEux7rclx7GIBwXqc
TZeCr0mwX53SiLwuCVZ5ujW0wVry/qcpL5tkYyTYN3L8spnVQqJHo/jDWOpe
nUSfJvFDEViiK7k++sXS8FZ/Cb5wv64o8oEQxND5CexQfgJQROcnqEP5CcBZ
Ov/AfJR/AJyn8xUsRPkKQAKdr2A2yldA7Msy5H8nGCD/O8GByF8Phn5E+QyC
UD4DYE3nK9iO8hWA+3R+Aw+U3wBk0fkNnFF+A6I/9Av580HvwuQBrYsCEOO2
/GjEMj7MmK4emHtdAFZ8gxrrHPnw/tJP934sEIK/l251yZhLzn9vM7G8bjRB
gm8y5zXonZFg/t/dT8dy+UTf5N90+wijDWyC5fdYpNdHsWDE3BcLPJpYYPkM
oZqTFguePRGw5/EFPqAsx+j62LPgdRlv7fdSAuBfVN7JNmHBh0fUTHy2MKhR
Sc8m1IzjQHbY057HrQzqZcvDXF95Dizflb8h6QpDPL/fOjVpDxumGfa6J+6S
oioL+LOjRGx4IljvTfBq8fyy7IXlsvVs+OC4nDscIkV5jueo5Mpw4F6WaeLu
BAa113lP5pJZLBjDC2xv2smgdNR/rV/cwIIWpQNe7DIG9Trky87xU1lw4euC
sl/i/RTOV4bsvQHw/f6Dx6aLhHC5U2DyikWs/8kHxQI+VyqqD1cIAY7vieYM
xkvBkf/GR8n9RiUzthSsE4EPW9S1u4arU907tucsT+GDPyP8829ZqVP4+83V
kyoc7NSpTVNUs10vCIm/2ZO5Pe6NaIDEP6Us32aP4IjL1aolox2E9UFYYEhf
J3uUFguM2btM+WwECwg6fTMe3hc/x1MeMC1hg9l/2hwX14n/73wiq/com8xH
yqg9Ce5B7Q1w+y5F7Qvy6XioJ4qHgjt0vNQFxUuBPx3fxPMnjmfaoHgmwVIo
3gm4HBQvxffj+ryB4qXAmo7fYn0ifB2geC3BdiieC7rp+sT5lnB9bkT1CcL+
G5+j87mL7ZQnmQ6W+SKw5lXyi6OLcPxeBN6edI91V5NgbN/lfTpstP8UB2b5
LH7SXM8Cxb8zPvnZsuH54MLEg2w2QP5zNrRc9TRbI5MNLm6frzxjOhfm0+0l
NeivYJP2HYbak2BX1N5Q5g9qv4uo/aAt3X6/UftB3N7jUXtD9YOxa45Y8MFm
HS/t8fcF8NfMI80t9/lAd0jYxLwbAjhZ+4boJsUHm7qSbULNBbDM+Mr18DA+
kBecalzmL4BySZ8CV1kLwKQJ5tHfLgtgbP5wrfhxAjB6ZvAhz/UC+D0+5kFl
DR9Aj56OMWkCqJtgqHhgFx+YvTVc+LVJop/hb7X1/YxPEv2M0AUeX+apSvQN
3CZH5yg6S65vMt3zVPu0AF6ZZ7H0W5AQTPn3OWzVZT4sfTg+drRIAMI2FZu9
yODDtbqO9zVWCcHwCqbnKxEf8r6Mil27SwDeuQvnVCcL4AIlswlhrwVgzrIh
yg/OCOBN17RE6xgBuHhyZ9QeN0n+2+juBb7D60VQa6HsjCu6fPBvjj3j9AYR
/FxbvuKqDQ90udkGJVaKoGK77fpvu3lAP/Ba2MYaEZxWtCJn10QemD8vv4Rz
SARtGBpHhUHi9bFSd0FZlQh6XpxT991FvH4O9e1JSBLBE7MEn0WrpKj1Zn/L
r1qLoF3r6dQcAYNifnxlPvePCNZYuvlJ60pRZUZzMs5cF79v96Nx+49IUY90
XXnqRQLoFmwCueulqENTt+SOHiqE+b1CheWq4vdNKlf+NiCAcZ7A9NRcKWpU
/zLXdUuEMEBpQudifymqYp3c+4obQqI/oIDWS4LPoPWS6HUYW27tWtwm0fd4
2zptovf/6XPZOr6+ely8f71tXLe4SwSDDGsEv/qFIIvzziq/XQQj1J6Of1sg
BE9bctzPZ4qgttFtnQfhIjAnV87K6ocIsr68SM8IEIFS9yVa0SkimCtXG31k
iggo6ZtbZ/0SwdTNey189ovtFsvA+VYBEn2QJToNf10+S3Bn/IX+K2dEMEGG
av3uxKBKHhqGbVssgqOj3OI2vBSBj30L144Vt+dpg/MG9sPE638Cz/7NFxFM
2Ti/6OR7EThzVSWn7ILk/8JMjezCFwoIPqg08Y3zcQk+3KPsoFshwdGfhpUP
KAuh0xH/i9ZQCGQ/dTwZe14IN+4w1HN6KwSrsjgacWLcVCtv/PmwEHxWr9NW
cRHCgseLNY4fE4GUSyPnllYK4Homa4bUZBEYcT21/o74/QGcX6wvW0VAI/1U
aqSaRK9kVcYf40YnFuw9g/I1IH4NC7649djQoIADCpnGy0NnsGFkZpPB5nMc
YLIqvkqRYpN8rd90/20L8mPDbud6m9xkLpmP9r8zTTJ6xQENTflsewceWc+P
auUV3x3Og7y4VoW1elg/jUfiOxNRvj545qdekw+XTfKTbsg5rAtVOOBlieyx
L8lcKJchn3uigw2aPpyZ9ecBF86aU6q/2UcIvsRu/rmuTDz+Cg9ZxEsJQT17
ueG7DwK4d8zNVA1KCLavDDm/SlEI487nDjkUJgBpmmrjZb4K4I6dzw95RwnA
HtnGLaM1hFB97/pRBe8FoIoB6l5VCWCwymUr8doEYpMFrh8ThXDttIMha3YK
QfWPBYW5zkI4szpTZ850IRDO1lCsSpTomxhO503d1isi+PaUhVxhlgg+v1AX
dtKODxynrj5rJu7vul+tDTfl80Ff2R7OKvH9zw7fPvIiiA8SQn655t8VwY03
3xs+WSQAI11CPvuIrz/J2/tzj5p4vnN3cDxzTwRPLUlSTvjAB9deTJsYLr6u
Vrdm2WcrPqhOsb+Y7i2CKrfGmfH8pCjb6vPhB8x4UCqqb2PaSilqhUPgaYW7
XJi38PreVvF4//tWZVOMMQ/GZERtbhHvz7hBunZ88frzeY4+Q2aaFHXAN65S
lMiBjgcd97wLlqK2/fsMo7Ql+iymM5P3ed3lEvvO/Gy5e9wUCRZ5//AsyOZC
w6tWT7ZfFQCjh+MutRWwoMAq6aflGCFYv2LCQpcrLKi5+PG4bXECEL4BHIhU
ZpH43Sl7Uc2Fn0yYu9goL1jcHirt3xVhHZvM754LP49Pd5BgmcfXTprdYkHD
rRoVD+cLQWj4xg+mFmw4wnHKmnaxHX8my/a7gw0bCnuvjZI3ZJD4Pp4Pin1/
7VXTl+DxK1NNlLIk+XdDe0vAmKFs2D/eNm7rCAaF+/9WR0fOF28GdaSoaNON
E3y4fUVpDAxkUBkXq37sHMeHof94MDuUQSW86OLYiu3f1tH7VGaK6ydrR99K
qzMSPZdjZb90FNM5ZH74Vj753cHHPIIDvUfpFIjHl0XgGU/GWSGwn75S6+oK
HqxO1ruu9UcI/mlFP05fxoNfVr9smiqeL3rqdbnZzVxonfZzz7HdIjD9R17A
y/k8uHdKfHrMDBHQe/GX47VYoi+ze1pkEztXovfiflnDc/4tHsGK35wSD83i
we+GTqySZQxqwcMHu/vyuDCwvuJlcKXYLl05lwFteFA322p1Kl8E+lLD9M7P
kZS/G74rcCpgE/xrwq1Z2g4ceO5SSLFTjAhc3rFs21MrDqzSO31IxlgEPKMz
ZPwWcCCL9ufPQf58qEf763H8bzTtb8fxLuw/Z1QM+s/hITqe8gzFQ2A3HT/B
GMdPClH8BE6k4yf4+h463ojjA0Im0kcwQ/oIxL9n28Dl5AxnghG0vg3O54Lt
U3+kZyPJL4r0boj/uBfpO4HHtL4T1hNk0nwqbM/+T/5sEEjnz8b5TvPO6Kgp
n+aCiGivlmEVHKBJz5/v0PwJ9Gn9nBaknwOwfs5wpJ9D3r/zvdJdpXVCgiG/
0C3qggSPMvUdyv8sBDKsd1q+0TySj/Tsv8NWdilcEDPNxSQ8UAhWZHr+PtXP
BVJ3ONtebxACV/W8NTpZXDCESuWZ3RYC1RFrfA6PFoAQ3e9vLlwWwtTbIe0O
8wVgwUcDkamnEHb9+hvjJt7vsc7keE26IoSTpitscDEVgOsM4abv9QLIfDQu
x/D/9M9iFP5yfgjguuVLz9hOFYBLWuDDqAlCWJt+SF1hKx/8jovLmpQmhJnu
Jfn1MXww/ckPa9vrQhjhuTInZjkfSD8NsPjtK4TJT7OlhDFqVPSR7z8O78P5
sNWoOdPqUyaJ15vntune97erUVj/c38xaIGPxPslffetOh/5wIIzZ2XtUBbY
WWJ8+hZLBLjVGkPT/jGB5exM463V4nW7pXebYywTnNZ+6RXrLgQNG34pl+cy
QeWVB9LykUJQutkwT+EbEzxN5dxcmikER3mOmkeGsECopabS849CoKPQfvdy
poT/ivmxMXaT/W68lOwf3UOF3lMOCkHqpjEjz4n3m5jv2j9i7rjpAxI+7JCn
R4p7f0n0I+U8XypEm7MIVmGvO9+XzQRFqcPtrnqIwLawyPGNDUzwr/bidcAU
Aj1jBzfZIiZoP9f2oFA8z6xj7FquEMkE2S+fFj24JwK7z8lv8QrB3xOBd/mJ
0n9qRODzjLZkXqoQXj4hr7OGKwKLLPNLh4rty4tHj7RQ90VggalJQqe4/Zuq
VuT2L2VQDnLPfy/JEcLKYyUB910YlK7e/o5yPyFcU/l48cXpDEopMXkGP1MI
V45hjjj3SDx/7lFIZIrtge5OrsfzDyJwPPePVuNoIfRri657K8+gMiu/vFYQ
7yfwejbXwcWgwUeiT3blczV0bxPCK69UGx7UMwifHdWveJ86+d3lewMc6Oxo
scLZXLzvZP4QcBs5ZD1KvWf6IapXosd2b7xvbGO2CLr8bGLE7hGCk3mf57qL
7dP6rdHy7zYJwN7O8iXx4vsv5DeUKNcJwMQxTKddYtw866Js93kB8EvKPeEi
ft7x08Qf7BsiYFL29sINOy4sLrDbt1WBQalVXtpnPosLj7nEZ7umi8DIvPRZ
D4o4sHDkW1XbFQzq6wy12LNGXMjff2Pq0skM6laXyVKXGVz4IWTjrvE5IjAz
oa3azIIDRcP+VTBHMyi3pXsf+orXw1Tmqz8bTYS03hwbSiX99m0LZYMxExwP
ba9lgzv0fvU52q+C0PmdC+pGsgH2j+L5LnNCUuoaOQ64SO9n0f6bDTTnyTi9
ZrLB9BLfLUvcOUAtV1GxejEHxMzadlJ1BgccD3H4cErIBTO0+/dZZ3DA6syW
juZELhCuTDh7Yi6HzEcNyD4Fsi7IPsXvj3RX0mWkc0ByY7B1lLQQqB0/+XrH
Bw6YptRTzxTbFcwsNX2zMHE5zUPB41oBGOdb7RTQyAYrLUrirD8JQOJhXs39
ERxQ5tyleli8b+TFyYfYjOKAt+lSTv1CAfm+ZfWz9c++8kHQusPxK+x5JN/u
dVGZt4wan/h78X4xKPQyy6ZUghfVemx3Gi4keJLV2Jb1CyS4MHfiyHEukvvP
qTUenpYgAGWGr9hfPnPBpibRbPO/AtBtOO95cAcXPNOKOLl5ihCMW6Zv4RHJ
Be2Uj7QTFNuRBqGeRflcYK+ZZ5jTKwBFtntXDzHjAZ8OXamsBgGIjVc2YR/j
gdKS+frrKgUgvmVsz2fx/rUk2NonQkMIzCz/PL6ixQP8qprQwHQBcL21nVOn
xgM1w6MibIwF4G5kkdbcxTww/Wd1+tUNAsCcqi/o3c8D++LAkZVnBSDC2KS5
o5QLptbWxp8NFYBvww/KOoq44Giefi4zQwAsPr0Lii7gguruLZet9wnAtSFO
7yvE17c9b7brn471ormgrU1V9oyRkODQgmXMQj9JvvMCpG8MDJIWLb0VIO4v
g+u3APTyPiw/KcUDIes6PneP5ZD7E5GeMhi3SS7I9gE5H/Ecx4umTLXXURbv
h+Hzb+0KR+RJ/t8LXTfPipijSD5XHH9O2vN1muJ+EeGPXkX52Ug+TVmUfw3i
fGszUL41GLEo2udhvRp1/d3akfKyPOgTFjXZqFWN5JOtpPP9Yf4oth++o3x/
hI/Wu8vYu6Con+C+2VUR0XEDhO/4cfhUDzu7AcJ36nndcMvZYIDw0+qHVQ4v
Nx8g/EOO96IKS58Bwj/z3KRbqHx/ANbnovhZEIqfEf7frzkHX/y91k/4SdN+
vz60UGuA7Ee5JfuXr9ftgQw6vo75rNj+Vz8vu+OTdDcp/2SZkJ/bXnaT8t/I
n7DTXKYbLqDjz/h5/D95l0283lzpJuXXrLAsW6vaAz3o+DG+H/9P5/wNEbMe
dcNDdHwY8wVxfLgPxYcJH1LZOX3mlGndcNE8za0x4vZJ9p19NTn2D5Re1lqS
16lG8qfeo/kWOD+qC50PE+cjxf6/Ru/BfJjkf4sH9mZ71bVDIc3HwM/j/3vZ
/bpPOrlNwi89Pd34XFk79KT5Fvh+/H+/WUZZEyza4W2a74D5aTh+vQTxHUj7
fc+zSvNd2w6L3t/XosKVyPti5lm+585Qpf7xrLufyrVDbP/uqVkxpFamA8ad
3FOxT1aV3P9F0yF3eaYqpW1zte3TrWbYFjhUUSZbleRjvS3okZYZrk5w0b+s
OdeFLMIfw/1hSPKbzT3hDaR+7ozfaTLf7TssoPlDeD+A6+PRrRVq6mX1pP1b
Bb8HbB59hwmFvYJzl+TJ/fj/UxH/hvx/ZVOW6YamevhwQczb5Dglcr9ugOql
RddUqJ6AJs/J2dXQOvzgSbcsFZKfdeuImiDBCHWCI7fNTnxQxSJ8Mlyeb0+X
XtfmvYZDvEKHl+6WpzoH+0sp1I2uvNIJRlE6acOu/ZZ/C22b1N19Jo4i1/XS
9eZGReL80c+LtnobK/1ffh+MC+n6w3yvf9xNGqHzh1P9wRsSJ/s9J/HzPf3T
Cteefgi0C+LtC3YOp3YO3p8LVtD5av/LF5Ol1FC+WoDz0eLrmK9TjfLRkvx7
8n2D+WfBI3f1u/uuq1DmFoyAVS+rAaDrCz+P6wtjzDcKQvl9wSM6fy/mO+Hv
laL8veR741B+XrC+NPWDfpsCtWXX5dbVsBbkSu+s8dBSJHw43B81UH8EHXR/
xO9Pp/sjxrj/2SjG+ez9/RMMo/momN9FzqeABdyYrz9BDc03xdfxfKW4Ythj
47OthE/Qt26N39F7P8FNmu+J78fx5lkoPzNIpvmc+HownZ8Z87vwemKA8jOD
JfR8lI7mIyBFz0f4flJez0WRd3j/CB9j3dPw74uD/5H+kZM5eZZDeRfhS4yN
aDrSk/IPXKL5xjifLB4vDrbR+x3HdoFPNF8YXyfz/dPYXbzJ/aQ+j594r6sR
30dww+eRgXLh/SCMPn+A+VC4vEeVHIocv/WR+rzbKBzxZ10/KKT5+vh+/D/h
tyzeTdDrJ/9z/LvW5Tz5fvI/VVWp1rOV+gl/LzxhR9XPaf2kfULZ763/rOon
3w+f9fO9nieb4L67u6vaBWxSHlO3CK6ztwQbFdrHbRvHIeWpFdb+Yz1kk/LM
u5and9CVTcpjHjxEZ794X47LM1W/9ov+Djap3+X6OStvJ7CJv6HU3PuluzYH
RNP2wn5kL4Ag2l74bz5ZIeBe0H3wOZlP8Gxfha7oVgkOMedMtTIXEPxA6qfP
n8MC8EV1TffkHSISL8P/rzx1gnDUbQm+dyBWkDRMQLDThwG+zkYBMKXkUicn
M0i+Try/Mnv1/Vhfu4jE469fg/UNpyVYKTzFrMRKgsM9I47ntghBo5Zu+tcl
aiS/iNRB34iZ1urk/bYpi2JzDMXjL+N3XNRkPjxTfDB9tqsUFXvjcGa0IR9u
zX1y1VBFirI4yLu6PZMHg1MY5k5inLS+VXnIKxY0rO4xtvCWos6EfUm2fsKC
Fz/FWm4Wr7+7d8veu6DJIvzxmx89VPl/mATLZ6ya9zVNcv2j6/PQDm0m4TvL
zN0cOFoowR6VF4PvVrIIXlL59m7qWCY5D1D1ecujRZTk/NXskpolhoBJ+Ob3
f929OPsei+A5/KMHv8czyfkn5yrT4vfxkvNQzXvnZkTwBsh5DMbCnlDHKCax
R9udn61NhZLzPCnh7enjr/YS3Mk8EuUW0EP+T9ftemhYeC/BU9Y137jm30PK
+25m4M91X3oJXuWSHsyM6SHlfVOX2aJ8q5dgi8vp1yINe0j+cqqhk5oW3ys5
z5VQ0jPav5fsz41dbeHc8D8EPwxSN9g9u4N876lo+zdK8S/BnkNsFYICOsj/
3+Yp7Yk17SDPn7p4+PKPoT9IezDXvY92mPKTXA9B10k+XXmvweukf55E3yd4
HCofWT93oe8TfBmVDxTT9hXmx+Ly5aPykfjwL1T/4H/ah6yX5qj+CR6L2od8
zwHVP8HlqH3IemqD6p/g16h9yPpqhtqDrE/SJwfbg3zvE+rvBN9C44PgEWh8
kPqzR/2dYKHN4PggeBUaH6S8Rqj/E/wWjQ9SXjvU/wl+gMYHKW8T6v8Er0bj
A/zPeCDrKQeNB9KeLoEbjrJvcgleZHlDfrUhj2A6fy/BlYGHD1Zp88Fwr+23
2sl5eyG8NWCRrfFYjfAzcm+PvT43S43aunXtXXUFIfS98j1PpK1ONRpszUzx
FsCUqXJe96apUzj/D/KnqFOde/aOCmgRwAsFV681vFMj/inMD9EvSPl3tlUE
Jrwetuujjjo1LKE6y128H8+k34f9Efh9ieh9oIbOv4HXD+xPfIPybRDcgPJx
gP1aDjZ+CUwQ4LnqjrKSCPAamecc3w0QvQLMfymUe2X2rkwIsd7FMOWCO9G5
QvA/GIro57F/Ez//Cj0PSkKKl8qbMigF/h+ZqvFCeMSq2lJ1GYPaesKkylZb
CKMXjyln6DOoHRkPeGOrBTCK9kfheA/2Rz1G/ihy3rIP5feB++h8Pji/wlw6
3w/GN68p7axZIgCXGr5vVh0nbp9z53cpMwTg3KfNvk6VfHi49SilockHIbor
zVd1isTv2/ahjc8DgXfNxiReF8Ge/RlnJj/jAZagf8WqHyKST6UnLX7Hptsi
WHdyrq3SGBF47Waz4csmEex3GRAejReB3wmve194imDNFzhTtIlD/geflw6d
OVrKQIYD485fjhr/lg8OG509dmurCMbfjnQXugqAqvylxvX+ImhmcWLMwwkM
SnVm+ZLpdzkw65gU97Q7g7pQx5zel86BPp7hS46PZVAyUd0fW6Zw4NAxVtPk
k8TzzyafoiBZLjwhO0rn9BYBmJP7sNRamQv1A58+bp3PoLhRelp7ZvKg1DHN
wJezGFRb0OYRA2J8JEI4Z4Uii+x/x5qkfjy6lE1wo92ezJYvTKL3e3CSdP7a
tSxyvqvyVFqS62Y2wRt25XUIbFhEj9YrxaBPLliFnBcqmFCjljaMBfB+6c34
kL8mnRL8rSH6qgpPou9qlXZWfdJIJZIvNaTBW2d2PxPg/VCt+rov36pZBNfT
z2M9U1v6eYy/tmlLj5vCAni/scCRH2Q9lk0wLj8+T4L1mK3kLmVeWFwHcg3i
RiclqpD9ih/9f/j+Vrq+8HmFf7TeCR7/eLz8SK97cXCfCM78PHFjq3h8+qer
Xs2PFNuDAgtuzFYmHS/iAYu1Gi5GTQOEj5RfXGdStkWSnwnPJyZoPoFWmrWl
IwP4QF5J/RIjgweTNDJugwRxf8+M9j6SyoN5oLEztVCNnP+/H17C/y22V096
mG3K0OHAcyGIP4/9V3j/bY748/A4fX4F+08MXAJPNDsrUg+fbDrQoN8NH40y
UKDeK1IhXk6lHLluiPPHXWclThm6qAv6GL00Uv2qRs4rugh1voWVDhB/C+ZD
6aQ9+rZJrwlu363rOPBTibqR3Xi64HcbZKauaTPuUqI06oPOHn3VBo/S523w
8/i8zUF03gYyIu61F8WokvjjjL/2etvsmcR/8d1TL9vv8gDBG+j96UG0PyX+
JK0F6XJ9tz/DInq/iuOPFfvZ+2xPK5D+jdevb5pb905OrYNs+nwXfj/2V0m/
HDzfBSOcA8xj5itTDl8eHXE1+gjvBGduK/NQJv4E3P8mDx/sfzCL7n/4+/MW
bGQencEk/gulF/w+q4QBgrF/QW3noH8BYn9CLhovpD7w/h7XB8bY/1GKygOm
0v4Pb+T/IPuhLT/uRbnsqwSLaH8Ivh/7W0M/yLeXdueDA/T/KqH/BZn0/+L7
2a8qvL3SVSil2yc2SplXAze6f+D9Pu4f+amD/YPYI3HovCJIpv1HOB5cRrcP
Hp+4fYpQ+4CntP+IxI/DUX/B+/nKl61rUmaNohg2twzvNbcB1WLGlr1LR1Ft
Bd3pHW/awG66f1ah/gl+0f3zKuqfAPvjfiF/HOGfO23MaLpf1UryK6awB8cH
CKbHB96fb6f1CPB5Fvz/L5EeATCkx98jNP7AC3r8bUDjDzyixzuOT+P9rOfi
got7O0QEKy/jpOh6iEAB7T/H6ztuv+PIX07rIapRXQZuB+TXiUB24I+Kt8sk
+SBnycKyNFs1SnFd6oPfaRI+90dkb8HNi+ve5D9mUGHW6y1Ga/HhsajV8S0t
DCrotNXGLxP5NJ9JbO/8tTt+4BkfPpr7+diUMeoknrvWqNQgoU+N2lMSbG/3
gQcve8hN6DfjgACnhX/adrChF/go3uoJgeb60UEDp8X7q6SP2/XuCsDKeQc0
Pqxmw6jjtQ1pMQIwoKp4mevFhg01nb5VZWrUsPmWdc4PhLCOMTGyQ0+dSv8U
tCAkTgB96e85oO8B8+FB5Q/mq1EekdWF5voioHricvKlaiY44dEg7XgD80vV
Kc6fwfKDt3T5cbwJxwOWaZ1MG1fMAmlX33+9OZUD4razV2++wAI+bX9GXxSx
gXxi0gv7TBY5j/YU6Q+BWFp/CPMJcpMZZfUqTFAi3Zb1oloEdNpMra+PZIKy
03W/lj4UAbmtjRoHkthgkeWnVUvjOHDH7iuNagfY4DhXyLzYwIbOHnYWl3aw
gQxPdeKTn2z4vDBaerYzm+gbofmHDbbLbc5XvSzJd0Ud8Nl5fxcH1kS/kVpV
gfNzciAVeizP2UkIlLa9jLQX15+LdNKMr+L2SNotW3BtsQCeTGgqWqkkBGs6
iwz1EjAflAf0Htn7bLgqIvhXn7fHKTeJfs6NCcZBw8+KoP0Zj4VWixmU+7he
T79yEVzEKRtbsoJBRXw4XzszVgSd54fcSxDbn/42C7NvfBTBCfIGs6NPCsFf
gY/M/jIBNGY7ZvrnCcFQtdCoa4pCuHWGbIT/gBC8rSu8f61cAL/u9FeYX8MG
5dlWQw7dYJN48q26azeWX+HC/vWBCqYLOKD98twhAWo8GDi0c1lNPhukwAXP
/uzjQE+7uk0WEzg0/44LX5Xu3z36BYOKmjZH9/w9Ltx6L1JYXy+274w4c2Kz
uNC7a8DE9SqDwnpVyD/DoNb7O6uvO8WHg8PHhkE5mR3dmPiAC4tnX1R6kyEE
O5vtC4NWcmDb4jvrWc1CoLfv2N3SZRzoTZ+nxeshPv+5G52nJetPEzqvSvRR
3NB8BG2LahY9r1SiSh/edmRb1pPz8dJo/oZTN2dp1PdK+NH+t06bpYxggUjj
vqV620WgTmMITBBfN8s0WWZuKwKH/qsnBvYPtq94vBiqrMl/KwLDLhd3nWxi
gl8NX1gdRSKgEa8sSN0mBPvSk7wKu0VQf6L0lZDZQrAiorneIEdsX59dtWHY
gACkyyWOvdgr6R8LHwr9eSEcEn+VcdzZtK+JDd5HXPdKmsID3vE6n3ZflsSj
J+3Tn9yczgH5XeW57te5YPrxD+Y6Aj6wl03TfxTPBSV+hVljb/BBw51jX0fW
csHGUVfXB3bzyfN6yZsZl7QlfJu+ikcur00k8WYg5SOY4y8AsRuSFowXckHd
4PgQAPn1TzIOZnKBfxg14vx0SXx0n9a/vU4DfIKzs4yWdFkLwMPTIT+viPe1
z0fuPMewE4CoJ95XN6aoUnP8i79VfGFCqbu/NBdUKVLajUauSsO7oYlmyHmP
EDXquI/yVC+VHpgUErHWYIwytflsSKShWRssbpz6sXM9H+Tm+4Qfjv8IH9H4
K8IghCc14dvxoVRr5lC920u+gjj6exPR98DQcRWbH64R74ctspufH2KD/Yxi
uJ0pAGdebnNcZcUk/ptkpyeB8U698MS3csWx5f+XTyTHyko87s7R/J1TiL8D
lOVc3u0qZIPkbVuXf67iwrjY2wFlK9hAtfN5r3GAhK9olLGjU+UWj+AXNpu9
3pnwYNYin803IxjUfTM/u9AZPLhD94V6QjyD8r198f7BGZJ4bsb9+RM+pbOh
Il3+uaj8UP99eMa3+mFUH+8aM/r0R2hMY0X+ICb+lX/6yv0J3e3EfpjDT5RK
WdoNjOn6PorqG2yh8yvj8YzsUSFweOB3P34OG5YItc999BP/b+86nzc3JHyU
Izc3Nh8QSfx9Ghs9bddO6QU4/qxb3RIwt7wHJJQenOsEVEi86/ZVX6m0ZkVi
L5oMUdQQaimReNElOn/wBpQ/GNi2K5wNlBf3nx2mJ2IncGBJWFXa168q1O+W
5gNr37Hhrv+2P8ze2Vvwt3gkNUZ74oyRwe0AjN58cNt9JepZs/m9o0ntYE3V
zUWLJitSrZSR4poZ3aAki+o6UK5AARmj2PQF3aAwax4V/VSN8ru6ZKXleiHc
wCnub+tVop5S41hTv34l89HxNPnEEZ698P8BQwpzpQ==
       "], {
        {Hue[0.], EdgeForm[None], GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJxNVEFrE2EQnWxLG/qFbQyxtWEJXRUvoj9GW29pQLAnjZgKHlRQL4pUkbZg
TCL1KKgnD4lNUC8e459oDh78BY0JzuO9RQ9Lvp198+bNm/mSXr99pRGZ2V1/
5vyJUrOaBw7XzC6UzHZyZueLZqWy2ca82cXY7LljfufNRgWzs/5+wzFFx+wF
sy3nuOXPbsXPHj/j3y/H5ElWzerOfS1H3Lrzf/aiqf+edv6HHjvlPK8i8jcd
9zJi3ftGXZseq/l57LW++NML5AU/9CLe96fumGeu8+ei2ZPEbOKx/cDcrv++
DcwBx1Gg1scJ8ciDxr766QTmPNB5EKi1Jw0NI19X8SPFoaEvjZkvPeGfuj81
r7EaUxe8u6nvwAE/W6aOgmPeeLwV6ANmAy8m/n1ePUJ7yb3bdvw7525GPKPW
VPzghQ8nep8umF1dIrYrP9AjdO1Lz3SFGoJraFc4a8z8IPPT3x8l1BNJS11z
gm7kggN7gzl+rZqtxMyDB9ghzPq7x/NlejZdpn9b0o8dwjny/rpV7gx2p6OZ
oK9z2puyc6TaSegFFtow96FmB1/wDDQLePBrkT6AD3sHn38U6NEL58kVqQ0a
s70EpiVfkZe943ysPUT/0NWUt+tF5g7dszsRfYDPf5Z5hjeoCS3oeRY4e2CG
a8wFB/yFz9iTtjCon2b8jh0F1kBuQ7sLrSPh4dGO9EEbsCPFX0tfvsjd6Gi3
F8qsO5dy/ge6UwNhUAfcbfFsFJiH+w0/jv+7F2PdDfQ41X4jd6R+v1W5G/i/
gR+Y0bbu7Fg8l2J6+6HCvcf3wwr5ZuK5V6FfSzF1DtULYifSv6d7AT/RM3p/
n3AGqJ31NZNO9D4J//Im4mmpF/j8KaHmj4num/QAv6n/wL98PcCw
            "]], PolygonBox[CompressedData["
1:eJwlkLtKQ2EQhCcXoiTBHENACIfAUVt9DCsbr90xIGipqIWFCGKtYiEIYkwr
eCvsRNTG1pewsfANNOI3bLGw/7+zM7OTrW7ObxQldagydTUuXdSkPfq5utRq
SacAdgrS9IhUpZboc/4OUumQ+hiKv9229ALRIkQnzLNEGjSkLlyfcL7CfQxm
UJFWwB/R/zSC67EkXXZC09rmaKJdQ28ZbBdMhfcM85z5GXw9+J7T0NoGMwV2
jMrpt/g7Z3YP5qkWHgr4efAO73UwTd437dj9HsYf+qUstHxTmb4Pvgd+357Q
zprh1R7sZTKJbIwxNuG9VogMneVoErvWtLY927s9/nL7Wye0nfEE2Os0vJsj
45ZiEln5Bt8yi+ZCNTJ8r0emztYZ/cHXb8dtX/i/g+s2jd473v0HaotC8w==

            "]]}]}, 
        {Hue[0.03699312949350079], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJxFlU2MnXMUxs907sz9mNt771xvXHfyes07xaK0Nt2wsTISrQpKbdSYSAii
lPhIpCbTsvCV+N5gkjYoNW0kGrNgZjqJBYl2QUmwsCLaqFZsqojn5/mLxZv/
ef/v+XjOOc85bzm9/Yb7VkXEPj2Demq9iHuGIs60JVcjjoxE3DkQ8Vke8Yfe
L29FdKuWn5b+g42Is5Kfkfz2cMRbenZK/lP22+T4jYmIQ9I5XIu4TvcDnYhp
3R/Q/TbdH5X/W3X+Lf0p3S/p/kA/4naBmdd5cyXiceF5Mdlgu0o+rsa2+r8N
51/y8XoR8aVinZV8rGb9rcJ/m3xskq+Nen92TPiE8zmd9arzBDO5Im+X/JFi
z0q3X0Zc0XKOn6sGbyrWE7rvCMMaPb8oxnLhXNakWpH3RsXaIrkrnRm9H5Rd
KfmE9Bel/+Gg/aMPrsmG64Me+qPS7WaOdX3Td/WEk7y+1jMVtscP999XnS/3
6NOLh/T9EeV5SvJs7u/Hki3fZ5LtLRX3D5na35H8kPdCw/29ilM6myWvbrmu
j8n3uPIuRmxz75Dfkc9XLhdIriuXT5uu66am/aOHTtYxfurNO30hbqNnnbrO
5arxE7dSulaDOtcJw2l9+zh3/+EDmOrJ9mDyCb+IvTu3zi6dX1SdDz5n0nsD
f+LNtGwHeo7JPTrwhj7RI3Ilr/vDfcc/8l7p7xn2XDxZmPO7C+ujA5aLOuby
YWH7Tb5PSucFvZ9Z7TzvFpblmusMf25UzB9q5sGevnGcbNtuYdC239Tc0395
3jAm8Ew2zcWya1zHa8Y2n5vnc+rdaM+6zZ7xMqvkDd4i5fhJbqyLuecV//Bu
Ic0++4D7IylPOLa5Yjy58n1U9ezJ/1rxYb10Ltbd+pZnOxPHl2rOnTov9l3H
pb75iT4cfk2xv5NOT3Zbms57bsK9gk9whthgoNfU7Keq6wanqD33z0u+Nu2B
n9uOPasefSvdr2quV565R/RqPu2iHaMRw5k5MNJynKP/7cam53mia1xbK8ZM
XGYSbNeMS78e8bD8XNbyvH2guKd0v0G4fx13T/DHDNL/DYmf9O102rfsFfYz
3Hg11eSV1B9iExdbdiA6l5be0etK583eZFZKYfhRNvtkuz93rd7LzRNwPjBg
nlGn389xr6gJe6BXmmfnle4BcS9Urd7J7fPd3LHYudgz3+S7M80/fXhfOk8p
/xXhPNE2R+A6cY+3PQO7CufdTbnzH4Dz4FgqfL9fHD43s3/qyq6k5+zpTmaf
ozovEdYdwrxW55VN82Cvehsdz89cYc5Opf8Fu5ye0g/6OZNqy38PP+DBN7HA
PFZaHy7wT6Be1ApO0TN4Bfa7GsbPf4BaYzs5bh6ze/hfosvsMo8r6b/JvkcH
Lg1l9lnR+VJu7r6sc37MGFeUSz3z7DLfZem4N8nnPxtlDSk=
            "]], PolygonBox[CompressedData["
1:eJwtlEmM1FUQxmuaYXqh6f5PTzND/22b7sFwYICTF7hwAhLWRFA8Ac7BGDWi
aFgSEpAthC1BQ7iwBQIogkCCCQeYjXjQBDmokAgHTxIgKqAXZJHfl28OL6l6
Ve97tXxVrf7Vb3yUiYh3Oe2c590RK8dGLEIpliLqPREb0d9Cn4F+oB5xOxtx
JxfxdSNiZyviu0LEEt5+jq3eG9EYF9HkFJKIPG+WtUV8AEYOrInod3j/rCNi
TxqxFYyhnH3kexaM1WDl8DmHPJO7/5ArnLP4V6uO5U/eTAb/Wi3iFFhvc9eN
rZt4VhDPSk4P8hbwB/FdDOZQkfzKEatIeDH+uapjVKwfEl+B+Gp6g/3SmIgU
uRP7ZvTl+E/Afxd3lwuOZxDsY8SUz9qngm8RjI/5axKYr1KLNvR+sG8Sw//8
fYWcHuF/H72ZGFPY+3m/jPimg/8p+LvBeAXbUf64he9y6jOeWoyQ78kO56zc
1SP1Sjm9KPsP/fUr5whvLzZcG+VU5b9OMJeiryemOvprif++TL5TKhH/dkUs
yLif/3T5TjZxQFy4wp/H+fsB+C3e/lS0/S/0Yf7axhlGfojP2tQcEVf+IOfT
5N6suNc/c3cI29Oy5d34HwX7MHe/oP+G/5f4X0D/PeeYE2Lvrbg3k6lvF//n
EuOLkwfxn0c88wquSbZqTiqXudy1U9sxLcsLsXdgT8lpF/Y13PVhm9qyLM79
wNsfOU+z7sk0bFvRb2T9h/7qLjnWFdTsGblsSN0r+WzDd5icvsD2Hv4t3g81
zF319zrv3yzaphqqlhl85qBfF6d4/3cz4vWC63MMrCdlz9IC4h9L/O1Vy6qZ
ajeu5Nw0w5rl8zVz+x3wv0V+H8yhrGfiHlhXR/t5gjNQMyfFTd2p1+KA6jfC
3Q7wt9TdW828Zl85KBfNhGZjoGFufEIN+kqeMc1aPzVoAzuTWNYO0C74qm5u
qIfq5d7Uu0E74Huwe3rMVeFNK5kjqoVqpFqJA+KCZl6zfwa8u1lzRtw5gf++
DnP6OPIId5+BNYM3U5nPKYllzZRma2LLu0MznCf2fOJZ1k7TbtMO0S5RTx42
vZO0C8SRWcTXqpgL4ri4/s2oXTM/HXsC3qaMY+xVPql3nXaIdolmSLP0GP0q
uTwou/aaqe0Nc0D5a2fex7am073VjpnbdI1Uqxv5iPnoazstq5/q9UDd2KrB
udQ7QrtCOyaIbbBmLmgmNBt9o3iKuVL1TlK/xem69mfJXBUn1qWeecni2JPx
nkHNonowm9q9BJAl210=
            "]], 
           PolygonBox[{{6811, 6810, 3618, 2023, 7339}, {7316, 2010, 3606, 
            6791, 6792}, {6792, 6791, 3607, 2011, 7318}, {7337, 2022, 3617, 
            6810, 6811}}]}]}, 
        {Hue[0.05825866026158444], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJw1VltsFVUUPZc+uL3cV3uHO8ztMLlzQ7QiRKM/ohgSXy0lUTQh0WiMgKko
WiO0jaBJ1RZFbcMHFU0I0CCJQRB5RKImLbaliKBo/PD1p39ieNRqpEWia7E2
H5Nz5sw++7H22ntPvOr5h9pnOOd+w1OF54Fq5zpxsCbhXBsONtY4twXvs33n
urD3sK7E+3idc/djPZ52bi3uLcPamHeuD2fzGpwLbV/vOVfEvgf7WdjfCblb
U86dLzv3OdaLSef6cb/sy04Fsk/CzirYXolzH++9OP800DfKzIPsjbF8K/ny
5YT5c3dZ+2frnTscyS7t78b9/lrn3sda5ynOOdCxNXTuMdjZAdkxPAOQb4L8
JPzain0ncFiQdW4F5H3Y+gryu3E+H3e3Qd9ps/tBKBz2Qkc7/FqPszY8Odzp
YOzQ+e9M3e1OSB/xJEbbcHcaujaXnCtA/gXoyWL9zPChH72wdwz3n4bsHrw/
jvuvJITNI9h3484+fKuFzHbo2V+SnUXwfRN8Wgq5P3LIi6e7jViXIxcbcS/D
M/iyGOctzGkknTfj7k749URK+vOe5A9GyuEwbDVD/mJB+ieA/ZWMcyM4Xwtf
jgaKPQffLxel/zxkl1RLvhX+FT3FNwbZGHJ7YG8kEMe+g54HYS/E+Sfgw6m0
8rauRhzdUCOOkhN8J+7EfG5F+7QvHj1n5/lY+1m+uDCelA9NDcr79ciRD5lX
yRlbWQeMffUM8ZKcDCvKbx3kDzBn8PNbxNsM/5bje4/lqLpOOehIKa4+fDue
lG3apU/Eh/keifT9TFq8Jk+2GIdoi3bnV8SH0Uh84l1i/H1atn6OlBvm6EP4
MNvqjnVQyCueCmL9Be+1kF+Es28gdwX+L84qVvKJ8Z4JVZcPpxUfZejfP8hv
C+Smkc/bs4qPXKvKC6P98CeVl8/E6ZZacZ15+j0nvjwD3U2++HtTA4mlfO+M
xM0LSX2bKAqnadhcYtjO9ORnp+HWXFZeJqH7vrLqcR1qvw6+tUJXT6S8Mr+s
77NF+c84aqDrUZxP5cT3AYv9y0j1Px6pL7A/VEP2Uk7yUYNqg3eO4HsmK67u
wv6lijg7BZ7/FCkvfbF6FvO5EHdPWt2x/shhYkR8jqakZwLvQ6HwJi/uTcuH
t3H2kfFtOFSdUZa4kF/MKXG7LS/+zYXP/+WEbcJXjbHWRgNhzDuUp3/0kzya
tPr8q6A6a7daay0rj+yFjdZDFuJeKVZ/CGLlj7Zo83Sofvc11sFAfeUCdAxa
j3oPcRzA+bvw4eNAvCF/aqyvrjbOHw5Uw4cCcZC1RFxYB5wfBdNFnTuw3oMY
BnB/H+QXxMLhFGwmffGBvBhLCrtrfOLK2p3jKx8B1i/wfhB2X0NMKU9cY28+
l1MNvxHJB/bofuv77P/vhKoz9inylJxiD+22WqJs7KnOGccKrDcgX39D18lI
84z1fywQB6mfOdtuMe4NhQ0x4twZDsSdIaxdkFnKGmYvsZmyCWebI/HkRezX
hJojnCeMj3lhPRDjNsN8mc30XaHyQXvOFw/arO7IU/KVXKfv9JWz8s1IZyNp
1fpVGwn1717rp+zBHaZr1Dh5HTDIepqH/I8gZgM2f6/1YvawlK/ewh5DbCbt
/6E3VIwbSup5tEM/+W9ATtInco24MUbOWuIzEAoj7t8qqY+wnwxG4gH5EBt3
OCNb7F+EsTTGmiWM50ig+cQ4y+gBo1azrF3OGdYUe1nCeg57yVRG+WLePMTz
K+QOkVdl4UYOns3JJmvoz7JyxxyyvzAm4k2cOYupa8j40FUvfcSRGL4eyQfW
N3Vw/lL+rrIwermiGiMP1terhhgzfaX9q/8GkL8jq57B/n05o5jYp3+E/iro
+SHSjKf8uYJ6AM85z54K5WdbqBpg3k7YPxpxY844G1mfrMlLNmvYs/8HhRZn
fA==
            "]], PolygonBox[CompressedData["
1:eJwtlUlsVWUUx0/fey1t7fDaPnr7npeb9xpRRIEENw4YEjWCLJwSFkZDAA1G
0RpBCKCJAzhS44KKKwWRhGgDDkRJTCwCLYIounLauVSZ6pBIgYTfP/+7+HLP
+b5z/mc+t7HyqfuHChExxClxlnZEDPPd3RLRaES0JREr4Nci1A79RE/E0baI
Cc5t9YjB3ogXeXsemePoXonOFvjPixGp6CziriYOdy9DT3VGLMn5c30RF/sj
ljVzh/FiJeKDasSb2L4XvIXgzQV/F7JF7P2M/oEattAvwf8CP4r8CPIPItOE
/tXliG3Cbo2YPRjxU2bdi9MiTqQR57stK3utxDMP/BfAa0HmN2QXdEVcQraP
sw9b8+DXNRmzH/ytxPRlOz7i30nwbipbV/n6Gl/WkJ8T8Nvh98KvhV9JLh4h
xkXkaxU6Y2DfAMatxLc5dayTyG+BPkVOFmFrMTb/J1cban47hM4l+P1gPtls
zM+gX8LnT4rW+YPYKsS0nvelxNeHvwP4e0/JNUqgr+BuM/TT2GyHrg+6Vrqb
Tiz/Yn8h8hPk7wx4Ad7DvN2tnMLvwMfVXLfgz07oV7E/3uqaXui0jGTVI7cT
79u5/BQxbFe+ulw/1fQ4/DW9zu8I/Czordw9lMsPQ0/meMrpneC9TgxftDsn
r2H7I2Q25f6MQh/j7r9WYwr7U/jfc161PDkQMR/djeRogNh28P4juis0BMT/
LRi7C/bxZuTXU79VRedzCfY70BlCdw2nJ3GO9SZMYY+k9l0xbEudQ+VSPb2r
6h5RrzxDDHOJZSx1r2nmvoI+nLl3dbeX2s/Ep7Pwy7CRYutM3b2jeqtX3qjZ
nnI8Tj/Nbji3m/DvOuis1/0ufw7z/hg2Dk7zTA7VPHOaBc3QHbwnieMZRifF
9tHMvf4PPnyT2Wf5rhn5PnWPq9ff4eyDfm7Qu+E+dJ6FntOw78rp9dA9FWOr
ZmXoybp3gXz6G/rXzLMt+Rux31mxrHS6oFennoUj+HOK3P7VbX317CvozqhY
VzN9C/U7C+bigmfkHPTHVfuqnabd9m7NvSMbx4j/w9S88rlHtjoci3pOvaec
KXea4UdT94B6QTPWhu0f8npqR2hXzCH/bxVcE+2yUsW1UE2aNYuZ8y8f/ySW
qX7P/gLuLkBXwVgO1nv4fADfJzLXQj1+Lfk5WHWt1aNj0Pt5f6DkHZzw/n6+
TzWjp8E/3Wds7VztXmEKWzNSQX5W2bMojPHMO127XT7UGs75kbyfhb0z827T
jiii25R4ljSzmt1Deb+rh9XL3eqfgndYWf+Xsv8tmqkZ9EtX4t0kmW7ojfn+
04x2Us/HU/e+anCeffNd6t2uedW/4ape94p24HT0G4lnXTWoQ18GU/HueQ==

            "]]}]}, 
        {Hue[0.07952419102966808], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJxFVmlsVFUUPrSddiyzMTN0mPbxOm9aZWkEpFERKDaokaJEbExMCKgtoUKo
QCxVEzTBmFZZ9B8YlkLRVH6YGAURxd2wyRpiwhbRWMGo7ItKWkC/L99N/PFy
77vv3HO/c77vnPuC5oWNCwrMrA9PIZ582qy5yGxf1ux+Dw/W5vhmP2O+FvOn
ImaHhpgtwzwF2x7YzcLG5waZDcuYdYbMxifMrpWZ1cPP3ymzu4rNPoLNTDwj
YfPqAKwlzX6E3ybY1MXMjmOeLTHbXm52KmzWhT1zAWx2oebNOC90m9nTRcLx
W4A9sE9j7xnYz8B6J+w/KJf/iVjfgb1vY+0FvB+HzSr4mY73scC9Bj5mIZbp
2Pci1ubBZgLmjwF/Ld67Ee9p+N+IcSTiWY2174Hx4ZzZAeBoQ7zteObgjEHA
8mcg+0qc2wCbg7CZgvGTQuGi/2Nx+T6EnMzB2BJSXGuBa42LketrHM4TYdlw
jXlhfg4Az2fwOXqg2Vuwr4uIoxasJ5HbNthHEtpHDMzfs/h2Fj4XwMeNqNkj
wHIV/CSSwkNc833ZtMJmEvKwEvOp+HYPfL2LcQxyNi4hDk7A9kGcO42awfp7
TgPUAvmhBshRLey7sbcG58Rg14hvUYxnEf94zNfDfjFsF4XEQQ74l2IeYLyc
Eo4rKeWO35+Hz+tR8XQO6/1R2bzuizf6ZDzPYOzAew/mSzC+FlIMBTi7Ad96
wdWbnvRDHRE7tdFo0v4rsF8F+7jDfAE2m5weyLOfkd8KjPe6/NTCNpfW2TWO
h/aQMPPM5cXK14as5l1ZaW+xi30d3h/C+EdKPJGLeThzSEa1xpr71GngF08a
oQ6pkxJgmg0/BbA9E5ef8qS011wq/SVh8yTm08DbLfhox3wz1mdEpKOqtM7m
XvoYGmhvI74vDGkvtd6KXNfD/suI9MEap54GuNy+n1W9PlHq9OxLn1+wb3g6
ewV8L8kjR9Dwy3lxSU4voF5GBeLtG/i56bT6EuLeWKwaZC2zblm/pzytN+Gs
pXivhq/H4acKNZgBL6dRP1t9aZS5vwHNl6elSWqT/Yu5TWeEi/lg7+DZxHBf
Qv2OWh4H2xspaeRWmbjlWeTXC4ShAuPHvvrRNoy/hsUx9UsNUUsjYtIfc1WC
+U+eOCW3rDFqiZqqTqt31bjewzgZ4+9l0jlr6IgnzHUJ6a7H4Z8CLE0hYb2C
nN6N98s59QJyyb4az6juYhnpnX2YmqcWFzmbB3Lycwl6qCuSH3LfDwyzsN7n
sHBO3bB2WRfML3PNnJ8Hzqvw8yjWrqdUa9QqdRuArw6MQxLSVpurl1an/3rE
t98T10eRz8aQcBDDpZTmfVHxzPxQG4UJ9fpuX3cP9fkXxkQgTcZZy7566zu+
zic/PDcPPHdAk1V5YWTfJU7ebcR9E34mF+k+41220vWQFZ5qjHcQOWKOGQ9z
eCuqPctx1mDyCv85+D+aUhysJ9bLbGfPPkT+yN2mrGrsHPI/IabeOhS6GJbU
HbAXexd4yi1zvB55KwGeDRirYLMdNrcnxSvtWef/luku9pLyS//z4WNyTjG1
DpIWroW1r9L1NPa2PVjbHdZ5e3zZ7MZ4OKK7tgZxDXfYiJG65Tp5GZGQv12w
7w2rNph3ao33PWOvCmRPf8wDc878s5d/XSh9LwuE4duIdEl9GjQ8Kabezf+X
LVndqVsxLkMu+jFfgXEUMH0FP3di3IFvm7D+Ocb1xeKMHFD/c91d84avs3hm
aVq1PBDjxITq7ojjvdfFwn5GrpnHnRGduxznHvSEnb2NdyHrY2xCduSCXLN3
U3ObHS5yx97E+mcf2IX1hoiwbsuKP+6twDgmqfz8gO9jk8JGjNQ27wBi4376
yQfK2czC/+878kJtUL/kjBrmnclcsR+xJuiH/qhfxkuby2H55N6TcdXnxTL9
m/Ab1/mdc2qA4xU35z8K631pXv2avTSC3F6MS1/UNXO5x+ntw6zqsTjQ3UWN
bna573SY6aPDcdfi+OQdtDeiuugCF/vB6T/Ys8/XPw77w1RXu1xf7f7P+B9x
NC4tsJbpc4L7v+B9RkzUBu+nocj5FthUYjzvaoq1y9wxh+xfO33FPhxxD86I
32rYn/TF3eik7kXeQ4cR+3cR+fSxfsyXH+q3wv17VGX0D8CcMMb/AGFbkOc=

            "]], PolygonBox[CompressedData["
1:eJwtlnmI1GUYx989ZlZ3Z3ZnZ8ZZZ50dd2Y3T8KLwjQPTFEzyRahEKVcyQ4j
A7MCCwxT8+o/C01XLco/imjXo7JDKlPzKCgwtSwqgyjUVg3Nqz7fvvPHD57n
fa7v+1zvr9C+sO3x8hBCB18l39nmEEZDjIMeEwthfs70n9EQHoKuSYcwA/mv
PULIJEL4IxPC3RHbXI6HcIlvVKXPJHuhEEJndQjj8fEw9gXs5yJfzNl9+L8N
H28AYG9FCCfzIQxLhvB8WQjbORsO3dIQwhJ8vQ5/K7qtnL2H7tOc9YH/MBvC
NrCtwn8W37fX2l4+jxJvWSm+8C/A/6fE3A/2A3yr4MfUGs9z+Gsi1jr0P0Z/
I/5+wn5tic9WhXBc+gljk80P8CPSxrYB/eHQuzj7Dd8rOPsAbM80hjCtzDFf
RLaSbyy2dyI/UxfCVvjjyGbAX4BvwcdL+HoFvhX6LXxMRX86ZxPB/iX6LyO7
hM1h6N7gWQ5/DzqtxRDOpcAI3cZ9TuKvP/IhNWAhZwPIXQ38KWyfQF7X4Jwp
d1vx0Qg9lHw8Bd7z6OzD/36+iz18X9VuDTk5Ti4mkpNJ4DmUN5ZZyIdh+wX8
+nLbHIAuFnyXPcRvgR6QsO9uvs/z/kQLo7Cqp9Rbv/B15V0j1WoC/v/hbse4
04hy99jv9FcdPmeCZTP13U2u+nLHrgrjK0N2JuXcTcLmbMo60lUOlIsd+D/d
w3fW3S+jc1e5a3aNXj6Vc21V/x+h38Z+fdQ1q8D+o5jnQ5gSSWMW9lbu0wt5
LO3aLCbfcfjhCedaPZ0n/1vweRrfbeCdhq8O+qUKfjZ8L/A3YX8/9pGeIYzE
NmAzF9spyCPI16B/NWr7WvgTeeuqf7+J+UwyxdhGrEdyngXNhGZTPuRLd9Ld
0g3uB81YL+iqWvffo8Ssgs+X8iv+MrXYgc1GbNuxqUF+mJi7kffj/kX6MV/C
v1I7AvwtRcvUswXoY3nn9xNsvoMejI8HKj3Dg6AP4b+90jMxC997Y67namJ2
ZI1BWISxjFhjka+Nesa6U665aj8HnasZ51j5UM72QV/Efj6yE9RsG/FrGzwb
T/KloI/2pq+j7r8b9MPmrGMrXjnxbirtI+2gPVnnSHiUoyZkz3LHRdx3NvwE
duuQpHed8jEA3W9j5pfD94OPUo8HwTtP+YbenjU9B503oQvoLI24h7LQ11OW
tZGTa9CDi5417YhBCc+MsAvDEmRX4t4PM/HRTT4uZNzr4zm7CP13yvT/OQRb
c9G9vBT/h+CP5DwLqtlh6Mak86uaqDYH89412gEDiX9z0rVdRrxW8O7iDpvw
PY+zndB9kHdWOMfKdSdnG6LuqS7oGxnfTTr/Qr/P2ZaoZ7YB/5uy3gXC8Cr0
+ZRrr/t9T23jxFwYccyp4LuScS/IRm+Vcqhcqud7N3hmNDva+dr92mnabdrp
O7nb19z5RpX7851Gv2l6225B/zz1/bmUH9nrLRmIfVul36sM/uNp85rvGcSa
gs3Rnu5B9aIwC7tqpF2+IOe3QjW6HreNbLUjDsa8I8TLZ13aM6hZ1E5MFLyj
tQvVj5/FvBPFa4evw/d0zu6tdo6Uq+5m30Xx/yJ+vfqxwjrJgntAvTAXPgff
p2BaNVFt2pC3V3sHaBeoxqq17jgV3+NL+0c7c1zOb57eviPIJyMvJrwb1ePN
4BkFvyLiHaJdohnRrGhH9E27p9RbspGtZmplSX80uR+Zdj3loz+ycxm/jarZ
sZR3kvQ1g0PpxdV5z4vegHN1/ifQv4F20Fj8Lao3VvWoevWxes+2dvId4H8t
712iGX43638c/euoZ77K+Z9A/wbKUZP+LWLGon2sfxXNpOqvHr4a9w7SLtI/
V3XaPaRe0s5pAe9S7ZeIa7S43v9EkqsfatN+c/T2SCeJ7X8X2Ez8
            "]], 
           PolygonBox[{{3615, 2020, 7328, 6808, 6809}, {6809, 6808, 6813, 
            1799, 6812}, {6790, 6789, 6794, 1787, 6793}, {3604, 2008, 7308, 
            6789, 6790}}]}]}, 
        {Hue[0.10078972179775232`], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJxFV1lsVFUYPt1m2un0dnpn2uGO09vOtAUtYGiJrFLAKLFgfWhjXYJLBEX2
JkYhMSBLJCIiRl7agETUtLIIPIAEKoGokS2YFgMmaAu4IIJJg7QEEYvfx3cS
H5rzz7n/+dfvX5p6cXHjokxjTCrDmCycC7ONWRYyZj8uL5YbU4tzUtKYabh/
DgxN4LlRYkwD+O8UGLMjF39Z4jsd1cl3bsqYZsgpwrkxYMxLOXq/JmHMTLyN
OcZswP3RPMn6sdCYMXj7F2SURoxZD/qAb8yofOiDjg3Qu84Xr8HbVnzvwrel
+D0/JHolPq2HvhD4L8LmfvCXQv4AzrZMyVkC/jmgN0F3I85q15hDsGsEzqEx
2Ak/p0D+eNCLQTeAPhM2Jg9yeiHn/YDsZhzqcD8V50BUvrXa+37Epxn+Xsf5
R9CYedD5Ku4nQ9Zq0CPjxtRA/gLIr8fdsLh0jYvJTtpAf1fliKcVdCW+zQJd
gXNbpmjKqocNs/C9gDLg89fQtwYx6EE8x4HvPGy7n35AVh34/oRNO2Gr60rP
zoB0TY5IbhXk34CfeYjVDNj2mKN4XoDs3qTue3Ae94zZjrdPQ38bcjobtpSB
9ye8zUWsJkHekSzxfAa5TTnSyxwfAs+z0D0W/HeC4l+F98WubKbtN6GnIyAf
aWOHtbMM9m3CORT+1jl6Vwp6m6ccLCpCjkCvJD/OA/j7CPQ+6LyNWDwCvf/i
XADMdOcLO5dLFJ+z0HvO4rAvKkx1W4zVZMsHfmP+j+cq17dRA1Px7WZUb/id
WD6MGF2Hb0dwjs+WPYx/V1I+n8aZ6aiuBvHuSlR855G76RHV3wPw9XxS8Seu
z0ZlRx/s/a1A9A+468wSboht2ttl/Vqboxww/oWQtRxnMeS0J0UXQk/UUT3+
jvvSlGLFmHWmkW/o3Y64HQR9DvQnoDuTqk3W6Gabd+Z/FHLXjvuJtB18V+Dj
LvBeRiym4X52UvVHO5lH2sgaZs2yHp/KEI7/gd29eNuDP8fR/RsJ5a0hU/Xv
It9LQRdA11bIbQHtpHT3eqZqzY/JngkR9RHaXBZRLS61PH/nKna0gzZ0B6WP
feuJkGQNhuQL65j5JC/xsCYp/rdwFiE+xfCnMK2+Qln05QNrWxB6T/ry/zjO
6SG9Jd968MzEmQH7A/C3CbJ/SSlejNslxK8jqD7L3ko9tI12/lygb69A5mq8
2QWeQ6jHzJjefog8Tk6KZwrOW1HFsB/9uQL8cyEnjXOer7dzfflAHVGcn3rC
+ru4fy+lHsheeKbw/35f6QgnxMuFAvWaU1HNhJ3W5pZs5YJ1yx7JOm20+CbO
ZyA+b9o43CqUPMabOerD72P4/Q5seDAmLNfZPJJnlRHW+Zv02znqpdRXX658
7PWEReaxij04oJplr5njy86XfeW7x+ql7CtWPu967T3rgL9ng/Yc/WZ9tCbF
k8BdIqb+5uHcnRBevoP8qpT6zlCcm2DTWtix2VNdUU4x5FTHVbfD48L8CznK
WRVyMixfftbGNKdHx4QD4oF464PcFvyuhg1r7ZzlvKVf5KHNlWnJGRLRzOC7
BuT01BD0evDf42o+se+OdpUL1gDjEYwLn0FH/Zj4YS2zhuaFVNu+o55wFbZU
pnTfDPnptGr9ZFj5u5vHmGYt59ApX2/4ttzR3KaPxAdjxhwzF5dsP1kG/rFh
5XIjYngUf9tAH8N50Zd934Du8YVb4jcQVwwiaWGSWCFO2DOpg3ni/GS8GQvi
lHsLsUrc1ofU83nHGmb9Pu5I1oSY+hF7Sxj0k2HZGwf9UFg70HbY8xrm0xLo
W2F7Kvsd8VQSV+7uc9SLmbtiR/2UNrKfEbPcK4jb+bZmWfechayt76Fnr685
UONoLnI+TnJUV6yvNl+9kn1pXUJxrbK4Yu9vtXOEO9HyHO0eflx0LWzpL1Q8
HkVtbfVF8449i9jIha6RacWTeA+mFLcAzm7wTYecXzG/rkW1O3GHctPCMfs9
8UGcNIbFy37CuXnQUw+vAiYHypUn7jvPgG8H7D6B7+2e9rMOT/OZs7XJ1i9r
gLl/uFz3nL2lrsVzXLWbyleNcye9O28y1DvYQ/Z5qgfWxQX4XR3Rbjo8rZnK
eboloV7P2Lb7sot7Gvcq5rzZzhTih9hh7J4PK3cTY9q7uV/tt/OA+Spz1UfY
Tzphw72OcMJaj6XlE3FNHXl2j+LOuCeg3HV7ors87YWMW0tS/YB9nu/3eML3
x7A5lRYeKtKad5yRrXZXoI+f+6oz4oPyua9wbxlA7691tW/UuHpDPDGXpNkj
iKsxEe21FXHpIf7Iw1443ua6wpWPrInBAtUi+9MW2Lkbcg6HtWdxnySG+P8A
c8X/S7jX8r6Ivcti7CruI65m0pdh+d5seyb7Mut+RFo1zFo+Cz13StR7B0uU
Q+6jzD0xwp5InIyIqOd966nOWe9f+Ko9+noC9DVf+eROtxBx/woxXZCUD/Ql
4Wq+8Z5+eq7uV+DdfzW8zY4=
            "]], PolygonBox[CompressedData["
1:eJw1lllsVVUUhjelE6X0lttL6ynltL2lIAUMQ0JBGdQooWh5gASHABoBB1Kg
LwqJYVYjIoHICwQkYrTIoPAgkoBEoiICouAABmUyYpgUmSooUr8///XhJGvt
Ne61/r3WqX5q5tgZWSGEj/iy+WrLQngpJ4TpMKOLQihMhTAbhWntQqiBr4J/
D341upXQ9cXWb0K/H/zBOISp0KvQ6YOsFzbN2LYVhPBHdQgX+W5Dn8gPoTuy
XsR7FftmbMbA1yZDWJplmxroE/jr0CGEDZyNwN/xCnhs5+BjYmEIvTm7AT8Z
++7EHwafj35bXgiH0T0UhbA11/n1l5wYC9tZ52d8f1thXZ3tKA+hOB3CFO7W
pWMInaF/Qicv4+8Qul04O5ZvnRR0X3yuDI5xmFjDM/XZCL8Pfj72W9qHMJKz
swnqDL8Q/fP42w7dJDn++pPfkZIQ7iD/nsSu5avGf22RdVUz1a6ZHD6Df5h8
m8n3ADE257rmPYhdSc0mEGsc8m7Q5difQP8f7M9Wu4fqpWJ0x/9jhc51Nzl+
D/0a+XyZb/+3OzmG6E/xMZ3YReRX3dE+V8IvQd5MvAnoLIZ+GvvN2G/CX4L4
u/D5Qb7vqLsOw2ZAlnWegV9G/guIP4T8z3P/qZxtQrYe/yPQvULN9sEvQ+cd
dPcjn0WsVs4OQO/E//BgH8uRp1PGivo5nLuOqgphrPCKvAH6FDaLkK2HPw09
FvsF2L8F3436rOUOc9Gfgs4a6KYK330Q9bsX3Rc5exTZYc5eQfZyhenRyEch
3w1/FX42OlvKjSnlIgwfJ97QYuNJ9R5AfQ5hsxP6Jvf5Cvn0ziHs7eD7vhv5
E72crwX640LXVjVSrXqrxvDzeEMD8f1mZKwJc2uhb1DT+7Kd/1Xuf42vMcsY
ul7lHsnfGOzPlYZwge8+6rGZs4vQvXmfi3OMab39yjLHUsw6bKuKXCvVrIW7
d07adhw6f2K/LXZt1bMPodtjPxXZCs7u5y59MvlvgN9LvrfJd2S2e67eP8Sd
tmf5zbcKm5F19eb09j6P3Eu9Ab2Fg9jfpdlFjMPYf1foWdWCj37EOldirC1G
fzX6p8i5AN9zqU89/b9e4vsPRr8VemPsWSXMC/tHS/xWhecfhc3YWOyHvK7Y
M1CzZiHxB8F3xud4fM9C/jy9rUl5Vm0i/uPkdgYfE3Kck3LTzNXs7QYGruG7
B/ZNBZ4ZjxS6R+qV7niK9zmAGHMz/RAWatKeHcJ0GvpCid9HIzpnsT2Pv1sF
frPrKowZ9XMi/srJ7WjC/oWJYvyVpD0LhfkkdNcy114xY+j6ItvKh7BxJOFY
yu9rYteUuRayke25THxhJsa2kW9mtneAdsHglHn1Y1Khd4Z2h/CVQHaVO4zP
MaZvdTLGhDX15Az8zVLXU/iPyL+hyP3QjtJuU0/VW/m4hu7vGf/aN3eiewb+
ZoHnWQn8b//z2CylXqfhWws8X3OR/5Lh9eayyK8i6ff1JP7b8H+71PSDypfY
dxcbi7pjzzLvKO0WzQTNhv2RsaEZpll2T8r41fsbmvIM0lvW/f/C38nMfYTZ
E9BX+AZl+MvQueTXgP5KfG6NPANkr5k2g9jj8TetwDNIs+iLyLtbZ92rjXFh
XTN8Wuw3ot4o/yHk0yftWSeM9k27Z5LrTZ2s8I7WrhamB6Bfm5nPmsEjqF95
0r1Sz/QW0vh/rsBveg+5fIP9suCzGmSpIvdGPVFvWmJjWZgStlbF7pXk6uWz
sXeJds4PCe9A7ULt8AhfWfRgXHCN8pBVZuaZ/OmtzIndW/VYvdeM16zXDNMs
yysyFiQXFhqRTw5+80n4nZHfh/5pdkBfKjVW1aNjCc98zX7tjE+o19uxe6Wd
tS52j9Qr7eRLCfdcvV+ETj2xVkSmhYEu1PJ67NmhmXlZ+yHt2aQaqpa/lno2
aiZod3ZNer8Ls8JuXeZ/TfnurPAb1lvWTNBsyM/cVzWeh7wQzL6Q5X/EJPWY
wYyb1N4z/AGw9m+Jsa+dpt3WJdM/9ewN7CuLHUs12kW+89OelfIp39si727V
tIF810Se3cpfs21gytjS+9a/6PVOnqXCk2ZBG3xj5n5/a55H3j3KcYN2R+Td
KgwIC+/HnjWaCZoNRyL/m+oNPkH8/knvbu3EOvRfj72fFWNJ7H8oyfWe9e+4
J7Of9I+qf9X/AKtMlnY=
            "]], 
           PolygonBox[{{6841, 6840, 7393, 2058, 3660}, {7785, 2222, 7787, 
            6764, 6765}, {3659, 2057, 7390, 6840, 6841}, {6765, 6764, 7232, 
            1959, 3554}}]}]}, 
        {Hue[0.12205525256583627`], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJxFl3tsleUdxx9Koae3t+WcQ8s5vHltGyGUgeBSKFtBHOjYJlPY5jbjEpg3
VAQGI0uEIEt28Q8RKrpsuu0PDWOKMKdbxrTqXGIQFGKt6IadUC4l3EwcozAl
wX2+fJ9kf5w8l/f3/C7f3/W03rbiG8srQgjzh4UwnHUhh80jQ7iR8zMl77ex
9jWEMJVvt2chXMyFcHVtCE9wLrMe51fiNxj3i3m7F5p9/G6G5wvcTeC3lPs1
FaYTzYLGEF7iPLsYQmNzCCtHhFDJ3X3DTL+at/uQ/XcUe78uhA6+PQn9ROi7
M8vYxLo+ZV8VQi7xu3Z+P+Ht+VrzvDNY9oR4/7lIIzkV8Hi5JoRHuL8DOUPc
34yM+cj6K+vR1PaKpoiMS+w/y5k+VPt8P3x6arzX/cvD/U334ic9pENDPoQu
7u6KGPZEueJ9Mb59JDNuQ+D9JXTYjg5T20L4G3p0831v9n+shc/SCssQ/wT6
+zlvy4x5f63Pz7N+UGtavRefXvDsBttt6NrD/smy8RgPhhvL9s9Y9sfqQ5jF
/lbuzqLTTfC4VAjhusoQvgu2XZw72C9gP017/Lic83R89HGT347C7quxoQFM
BpF/uMHvjsAnh61/Zr9BdNA0oWcj61BLCJ3gco717hG+vwe6M02WdZr1i2Dy
O3wyAE2RN2OgGc36bozVvfDfUrLO0v3XFfaN/HKgwfoeKBgXyZDf3+F+Cus+
7udWWoe54PUWeu6qcn50YuPD8OjArivYP8C+E6za2W9k/3X2k9ucI5NYJ+ZN
I1rF3cQYhyfqjd1H2LKn2vYpX45wPxP6ZWA+rtnYfDWxH6WrfC1bpbPO51us
1w9T+2VGjW2+lnh4lvXL+GI/Pv4N725hbc8bh3fqbKswVFx2RTyF6x3weWiE
36+L+bWW9UKMZ+VKb2qe/fj0PL8MG25A5jLk31rp+tBXsn/ncT8ncb69x7vd
qXNZOb0HmlXQX4OesxPLHlf0Kvm/DbZB+73Qfh6a7/FtTNGr/Co8+1PH079S
5/oLMUcOFozzIdZfpc4J5cqmGOeKd+XU8zGPXizbvzcg5zt1tmd8K/4s2pZe
dBjPfhv7t9jXVrtG6Tws55ztjnVPsqTDTuR+DIbtxMMrYHUSuivQYTJ87kW3
3fD5QtE1pxNZF2OO/YL7Kr2Bfi3vFibGalbRfhiKvugoOu+Uf59krquqr8+l
rrkFeD4Vc1y5/i73AZ77U/tPflSMqK6siTpPy1sf1cKeWKPk0yvh9TR9YVfJ
ufRgxF9+0Fn7AWjmsT9f79ojbBdxPtPqWjwOO7YiexBMWhLH/5vVzsEp0PwI
eVNZV9f6m/JifZttreb+OmJ+N/fLRzlv9sS3zdXGU37aEvk/lboWqCaoj12K
tVe2JHnXwMEm43kh9ox7waSD7/9sMK6KbcXEucz5+DV03oweY7n/ANxORf6b
wGRnjXuTdFZvky8WNrrOStYxZB1tcf25Ht1ejLGhGBGur6DDT9VT4v1EZM1N
rc8R3p2qNc32WL/ER/z6Y8wL3xOtxrvM21LevvgEuV9Bh2+h18/gt3qU8RSu
f1TcImtO7EfKU/W7yY3269uZZUuH/cj8T6tr2gz4H2pxHdmA7UVk7YBnIW8d
Zc/2OFPIX5orTja53qgfKgaVN7L3T9CsrDRev0Ren+KNtZB4P4jMSuJ7Cf4Z
wboic21+FZt28H1KpetmHnuakV1gPRxr6YfI7G8yzdvo/16D39wNj2VgcQbZ
PyAvPo11/7N6zxmqUdPAYMUox+K6NsdmRezXc2NdUq3V7KLYyaHnrrJ7wX8z
12b1DuGunin+6n9vlMx/kupx2Rgcgf4hfm/CfwPrvzPH2BDr0cy+f63NcfRM
zrirTqv+SA9hLcxVfwbqjbPwvimxPtLr4cz9bCPrYOzv6tXzE8e46p9iQZgo
Hr6fWdbizDVItegB1oGC8ZcfRia+P4ztH3Iu8/4l+Oxkf5z7v2S2WbbrTWed
eV+Ax+nMeXuGdUzedJoRpseaNqPZvMSzLzU2qo3qcZpLpP9R7BgdY+/RkvNP
eXgWG2bjlxr4H8z8XbEu2Yc513E/wDoscWyugt+iOsfi+yXnv2L+H+j5WMm6
SUfFoHJHNSfjbT88T2L7wRhjvQX3As088on6oXBQrXwWeYfY/yFzXVa97Ubu
hMT3H3G3JTPP32e2o6/Ktggv6X4tOl6ZONdVUyVPchXjpzL3QfVD5YHeqkYq
RmSv8m0Nb7Zyfw00yzP7ekXZcSo5itWeiPmJ1HObbDmW2cfy9Tr2J8DnVfY/
zmy/dN6aebbQjHEVsfp0yTmgOWVJZrmzUtcXYaRYVW1SjRqqt22y8b7UfaMU
e4dqiPhIN81Gyut7JKvkmq9eKn3rcu5ni+s8O8wpGlNhuwP6tmbTz0tcx1XP
NWfJN0tj/5JP1CvVBxU7mkXEqxz10ZywGf0OIG904lns8vymHoTNY6EZSdwN
b7a+qrvH49yu96frnWPz4TEzNSbyifiPjf+PLsV+q56qme71Ksd8TavjT7VQ
uJTinKMarVp9VaN76ZI407bH/1+ypzvqvDG1vooN9SnpVo5yhd/6GmOomni5
NkI/PXHNV+1X3a6NsXQ21ij1w65m1/AFieu16vbjfH+ubH+/lnpm0rvX9b8y
8/+pKeh8Y6xRmqM/zbmOqSYeT429/Dkn9i/hOpha12/yrtzo/3Xj22yTckZ2
CS/hptyeWbRuXUXPTUujv5SbD0acf546/teWjYFmLeGwKjWflal9ojei1yyv
GVQxo1lvUYwZzXCanQagP1fv2NZMdPl/F9+/zTqp0Xbu03+6xG/Vt3sz89Sc
+z9q9Cwm
            "]], PolygonBox[CompressedData["
1:eJwtlnlsVFUUxm8HaUttp0NnaJ3h+WInFAVZJIKgBZQtRFEEFZdoIiq4sktM
lOCSuERFqKhRUf9QEZE97rKJcQMEhSoaF6CsKmBUZFGIy+/ze3/cvHveOfc7
yz3Lrb9+4iUTUiGEzawTWJemQ6gsD6FQFsKKQghHakO4snUIg8WENzoO4TX4
C1pB1oRweWUITbDml4bQoT6ErnUhPIr8GOTPRb4z6zewwokh/Aq/LhfC1fDG
V4RwBWdvBm8xeH1LQthZFcJJ8K+B3xn5fCaEr/MhvAH2cow8B94A8EqQz4G5
DPtGQE9G/hF0dkH3A1EIl6HuIGceZH8v+KuRHwp+HnsXQ2+HLoJfDf6yYgir
2O9j7YqNIawpYI4EuzFnfNlwLfa2nBLCK+jujj3b2c/jzPfgncz5MvB21zo2
4m+uDmEm/M/gj4Sejy/NkWP7PDZuYj8D/nr4F8OfC38ImOvahDAVvIltQ2gN
5lhkJ2NTBtv65WzbPcSvD/G8qtJY+reO81trHcvu0NvYX0GMGktscyP6ziQG
H7TyHemupsAfDv8j+FPgf11p/onYsB3beqFvAlgR9AXY0oqYfFJmnx6Dfz70
DM6/if09kP0ia90N2HcmWJMjY/eBHgDdE/2PIf8u8r3Y94M/r8zyO/B9I5jH
wL4fmfPAboOPY7DnJuytYD8j79gqB69D9gnoxfAHEoPe4B/E51HI9sSGn8in
/dAjEnobtl2IvkXKHc7/wP2MzDi3dMeNxKMGm3qlfOZArW2QLQv41xH/xkXW
dYB8GM/+IvgzE3/Ohr8THY3sByHTwn5rte2Rje1qrFO6Reegn8q7tnTmSfZr
Iue2aup99tvwsYLYvwC9Bf/+jK1PNv/FPltjLOmQ7zfGvm/F9Cb2s4jZ6gqf
3wveUOy9FX11YO6H3x3//8Wef1iboZvIh7vAHg3GLPZnwA/IrkRHJ3Sdio+P
B59pRn4Oq5n9MXQ8DP6rST38LZ3QDdRXJ3L5dFYBrC7QPdgfR+ZzZBew7kTf
9/xbAS+AP4rPRviPw1uS1Kv6x1vgdQPjuZR7xCb5x9pQ7nq/C3sPV/us/jXB
O1Ll2lcPuA96SOT77ce/3fD61Dm/lZO92XfBxxfh3w3dmX0p+trLdlYt9rVP
Ozb6Vwd9OME/hL/bifUN6DgjZXobdMeifR+HzEvYtytyrugOLwYrA78W/s3c
Xyn6s9B10LcgU1300l4ybdk3gDkn5Rh2LTqGx5N+uBT8t6H3lrvHqtd+RQ72
TLkn7KiyD/JFPUW9pR30SdC3IfMyZxuw6TZkH4Jegq0r+fdzueNxFrzeae/1
b1VsGclK5zvQP0CXl7snfFhwz1DvaM/6PfY/8UQfhG5hVbZxz1Fv6ph2rJSD
S8G6G/4q8I4SzzuhW9e5F6znzCT643eVxpKOP5C9Jbav8vlW5Rc1NbvUM2Eg
sm1rfPfKAdX6rirTkh8Efp/EP+XA2sg1odpQDagWmpP+ppm1hVybVnDuNRP/
dNozSXeRgj9QvTLv2aie1iXjmlBt7EFmbuQZp1mnGlGtdKz3bNQd6653xu4/
mlGaVboj3dV30MuhH0Tm9Qr3m4ng9U/mg2ZYf7B7ZeyLar5I7PYk80k5+iX2
7wavuo1nqmbrR3n3Ot3JDuUy+HdUuOZV+5oJmg0B+S/Rd3vk2aYZUsL5BxJ7
1B8n6Dw2LkpZRw/2P9a7V6hnZNOuadW23gjvRX4jiFbNn5Z2TamWZO8+Yh8X
PbvFXxi7xsT/vwarPGM0a9RTj2ddU6ot5Xiu6Jmv84r/vMgzR7NHd6q7PQTd
W/GEPpZ1TBVb/TsMb3rRs1k9Sr1Kb5LlST0Px96XImNLh2xtSepd/eXCtGe2
ZrfeWHsi57ByWTNfs79Q9FtCPXRu7Bkq+9TP+yLfDoxvyxxDxVI5p9xTz6jh
7Abub2HK9bSR/cCce7/+DWK/JXJu6k67cz4mHiez3kPXctazST/PgXes2m8+
xVJvlEfh/Vvl2OhNqLfh0Ixnv2p+H/xNedPKt83sZ0a2Vz7Jt2nQG8qMXwXd
rejZop7eFaxT0o6famQ/9pWnLa/63wXdkPPbUjPxXOTX5q1LOf5p3md0VvGL
OZtKOzfXIj+Y+K4p+q2nnByQ8UxVfDQjZ3L2m6RfqifswdeNWb83NFNboFdX
Oh+U48r1SZFzXbRqUTGTb7L5nsg+ilZMn1YvyfqtJ5tk2y+1fpuoH31b7Rmq
u1XMmiL3PPkuvOmR35iKpfizI8dEfPXIUvDG8m8May9YP7L6J+8r2a+34E/J
+1P+6m2gnqneqRnYM+eeod6h91Bf6PJ6vz2PovNjfJlYsL96Q+2v8szW7NbM
6ID+YWnnegzmEbCHZbwXvt6SBfjXlnjmP4MtX0XuJepxKwue4eqnemPqrXkg
9ltFOdXM/U5o67tUT38N+nDs/q+Zcij2Hco3+bhV74O8e4d6XlPePVO9Uzbk
1V+yjr/eT3qryUf5qjfnVHT9B1/Wy9w=
            "]], 
           PolygonBox[{{7809, 2238, 4072, 7268, 7269}, {4071, 4070, 7805, 
            2237, 8711}, {8745, 2032, 7355, 4125, 4126}, {7866, 7865, 4127, 
            2281, 7868}}]}]}, 
        {Hue[0.1433207833339199], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJw1V2lsVFUUvi10m+V1mJl0nPH56ExEJFqprEUUApTFgEFAFqOJQtFEIyII
mLjEkIBLXCgFSkwIJu6asFTUqCiigLsitqAoWmgLbWkRF1A2l+/jO/54uffd
e+65Z/3Oudk586fene+cq8lzrgfGwmLneuJbhfkdPZ1bWuDcE9hzSecm4P+h
nHMNhc6lS7TeEXauHd/jYLIGY2ORc3dinkvp7OCYc31w5jGspTG/2neuEuwG
Rpw7HgUv0E/D2nF8vXDv8KxzUfD+IOTcs6DrCnTPeA+8S52bCJ6HyyRDGehe
Bs1inP0EfBZhvBv0DeCzHHwuhwwrcPZ6nI2B9iMouAFyTM8414bz+aDfA/p1
WOsP2e7Pk5zLwPNMuXOfgucS0DwFmsm0D/h0Q8dj+OLgdw5jPvT4GvNfAtlk
AvgU4P4k5pvAq9qTTfeDz/0Z8VkB2oM4ewvkuZ7/1Bk0HaBZCblG5IuuKyzZ
6iDPPuz1AM13GF9Ji+5p8NkPm0yBTY7BJmfxn6VcGFfirtng4eP+U9BlOOxZ
Aj804vx68GsGTWcgOTsw3ob196HvUswfwJ3dmM/D+cqYZKCdmvCdxPqHvnT/
DPM/IMeDkP9VzMf5upPnF+OOG0Piw/83IfsW/B8DfVWgGHgdtmuH3BWIq88T
zoVBGyqS/XcViX4s5k3Q93Wc24vxWtwxFPwOQ6clkGFSSPb/FTLk4f83jHtw
16mQYrEea1+GFZsrYJN/wacWYxq28LF2AUYP5zfmK97aA/l2Jfg8l5FMl4Bm
J+xcDTvvh7wnihQrlPNj6JCH/7qM1rjH3GmGfBdDhoPl8iPj5hHsv5CRXZ/P
KNbCpu9B6D8YdmjBOB7jNIuBlrB8R1tTnyZ8tzvlImkYPxwZ/5wfDZQX4+G3
UTHl0facYvkGoz9kvpsBPqth02WwyZq08rbR+A8LyQe0/zOw+TzsRWCTYdD3
EdCvBX0z9u/KFz1tzrMznWScZ+u7cPdE8Cq2vN6O+YXYfyenM/WQ9zS+cuyd
wvgL7ophfSbittQTDWkZC4whynMCuPEa5j+DZ7+44pNxOggY9Qr2/wCfOYFo
5mJcGOjsAowtpcqvNtj5FvhgJOzRCX47Me8NudxFzv0eaL4Daw2+Ynizr3PM
O8pQBJlixD7w6wwr9tqLpRvlZ44RRxkTjIfhvjBnZkb5wBhgjnwFO27A+pcY
F/fUnGeHQPcOnH+PuZxWjnyWEGbQ9/RjM+7eApp7AtGR/l2MzdDnKuwfQay+
lVCuMee+TQs3uzG/LCl8H5gSppI/zxwoVX5Ngrwd4DMCa7+Dz8pA97IObIQM
b+CuaiebMF4Zq2+bDFsxtiZkp3t5L77bQdMXZy9Nyh6NgbCY68yLswnxG4X4
qsBef8wbMK9P6w76bStsV8t4h20mJJWzo+H3iUnVgRrQT/WE+SOh1xSbsw4Q
s4hdgzzlK31ArGIeEMuYC/NsjXHbAvowdGnDWGPYOAfjZE/rrZiPwb2LIP9o
jEtD8h99t9AXzi2EvKuziu0DEWER6wUxs9rOTge/qdBhK+4+6iuGThgmFMSU
X2U5rZ00bLnBkx2+yCgHGOc1sNkRX3WE9YRneLYQPDaDbjnoR3mqi6yP2yLC
VMYDbfd9RLhXm5VPmFP0y9++cmpuRDWMtWxAVndThn9w71lf+cIcmuWpjrOe
s97SR7yb9Ya22Qc+n2LvNOirPOU/czycEzb0shxiXFNO5ucnRv+xr9ymPD9E
ZEv6jvbchvhYBfqBgWo28e7RrLD/JcN/5hzrC/NubVi4xNoxFPFRixyoSgmz
Hy5U/DF/z1kOc/zb5t8Eml8Rk8zENdaOAWHRsV6zjjJm/oyqbrP/YLwTjz2j
32GYc8CXPIwPYnDvrPqpF7Gf5wmH7/WlA3UhxtabTqTvnxXvvb4weI3R0B7U
hXnNPKEvvk5L77V2dnexeNKGi3ppj5jdhrrVF/PBEfVojGfmJ7GNsb7eejhi
y27WLuDwTvh7UFw6DgpLz3U51S/2ILMDyfNkWni+y/hyLR2SzQP2bTjbF+c2
QZ8u1l/Y4C/rYciPPuwyP7JvIHYRI9kTELsOJBR794Wk8yLDf9aBypRwj/h3
znpd+qsqqxy8Jinb0j6MjStz0qUSYyqnmnehp/tnhSQD8+xOq3fncwz2bsNd
PwM3xyGufsJYG6hOnyxV3NYb//yw8pr53Uishmx7E/IndSCvfwp1L/lfFVKt
Jy+uz7Y6wprOnpI1PoCvKzDvlxPWsQ8j3rWWCc+PRNXfMN+Z9+zfQ9bvHYpK
hqaEcqfeYmNgTr0ie8ZTZYqv1YHqGevaCPhqc0650IL1seWqVff0UnwxzniG
dYPxxFhaFWi9jr1luWKgsVz+z/v/TWE0pH0vI2xowl3OV7ywVtDHjLXlVquo
YyIuzCJWTEvKzwXma+bjBsO3oYHk55uA9YNYeIZ9bEQ5Oj4pHCGe3If1IRbn
P9JuVh9p19Hmd2It+yTWknBW76NO6w1aA9mHdsrE1P/xbZS2+QVJ6d1pug9H
rNYhfqbE5Gf6mzEwJqa3xQCcHUN8hmytUdVO2nWBL7vT/gUp1ULWwaFxxRx7
ZtY79jLDrMembTbZW4PY32X96oCU3l8TPO1znTTE6e32RutnvQRzi7J3mPzs
tSkz43OGp/o4FrRVceUa6x7fVOwd+Dbqigrv52dUx/qUqMawd+a9m6zXYA4w
/r24sO3WQD0n+3nanX0Ga1gl7B/KKe4Ysy/ZW4DxTH8w95h3Z6z/XG3+4t75
njysvKKtDvuSmThRnFOenS7XW7DbZOMaz5zvw00X9ph5vaXL9JhyjXeQ/2D6
Bf69DuuxlHCENT8ZNxwrFcb8azZkn87eiz6eb/5lnp0zLKGcfPc02VuhO6o3
xaGEZGS+06epuPiUYWyL6u02FvqNtlga5asOLDG+tEGLvRlCWcVPSVbvAPrj
fH9mtqINKNdBsxtxpd30vTmi/oU9ILG8xeirfcnAd2RFTHX0ipxiqN3q9pVZ
4flN4PEfUkZY7A==
            "]], PolygonBox[CompressedData["
1:eJwtl3lsVVUQxk9L19f28WybYsv1domKGtlKESmKQotgIIqgotFEwSXRiIgW
DYiiiRo3aCnua1SIKAqC+4Y7aqIitLiBlkUosrmCIm6/z+/+MXnn3JkzM2fO
zDfzaqdMm3B5dgihC8qBlheH0J/fylQInTUhTIlCeDM/hExRCHl1IXSzLykI
4Qb4Q2tDmB2HcC10PTQHauD84fAGoKyjLIQN7GsKQ6iFDsBvqQphfFYIH6Jz
BrpGZ0KogLc8L4S1lSGMYV+Z7DvY7yux/b3o3Ii9zTXWv5hvTZwfkw7hjiyf
2YP+zdgcjO1JuSFs6hnCdOztRtdy5H9E1xbOFOF/NfLjsJUDXUoALoMyvUK4
MpH/APksdHci35v1I8Skg/UZyB9W6BgoFoO5Xx/8eQqZZvYtke/WyLcmeB01
juUcdM7lPvPwcT7rU/F5bmwf5Mv7PdBV6jvr7iugTtaz8edX1h+jMwd/xmcc
S8V0P+c3YK8a3pP4tz4yaa2Y7oB/Nzpu4nwz3w4Qm12x9StmO2P7JN8WcJ+V
xGtTEr8V7L9j/w8ybVm+c1Z1CJ/A7wt/LPHtgD8xcmxfQH4j+4O5w9IetnkX
uq/g/PPwTkDHDuK/nX05unL51qT4ljlX9KZ623XJ/iT0r5K+8hBu5W1mcb4e
+asiv81Q5PchX09OLsu2zkGs+xGfv9H9F7QaW6Miv43eaAvyX7LvAe8W9K0k
toug2zg/lf1C1sPIsYPgP0q8JiuX0VmUbx+q0D06ybcb8a+OfHkH/u4i+9AE
fxDfLsmxTD3rUfg/g/2N2G9E9zp8yi60zJHwBsWOfSPyXcRnATLvKb+x/ze+
tid7vfEvyPbB3tFF9rkaXiM22vGllfMT8K2Ib1PhRchUIntwndedqmH4heyH
oe90ZApYN3C+Ndf2GvCngPNjU64J1UY1MjG0BNvPQL/Az0ZfNz4PQt9a3qik
yDmh3Miq8/5p+FOQ/7bCb6k33cT9unsaS1TTF3G/47H5erb9Pw197bxBFrzJ
7Oeznh45d1WTV6r+kGlB153o7IfvvbFXBS3E1iJoHTLPou9mzo9Edm+FsUA5
vQv7I8t9Xvh1Pu97DfIf5RuThE2PQal8v/njrB+B/zC0EFoUGVOkTzmuXH+J
by9Cr0KvQdnQ93nG0KBcVb5x3/3o+5D1J9TEs3nOiZPw5Ztix15vrLdOK37Q
vdzlPmi16gF+MzbXc5c/k/pWPhxgPYAzF+f4zv1Zf1FsrJKNT7E1Dpkh2a6/
ndw/HOKzsqdc+xf9ozl/C/JDOfs2tt+CV0KObsH+r7X2fzvveQzxrEjqWzFQ
bPshXw+/HdVrOH9+7FwWpkxm/XGCF8oJ5caOyO8tTDkdfRvK7N9w9t34N7Hc
8VBODuZ9d2PjtFzzt8NvKDVWtvFtCPwidK7Bt0mcSbFeUex4LeEOM/F9ePIe
2s9iv7XC2CUf06WWEU8yQ/D36wrHWjpewrf1xbYnjP4d/lYozbqB+wzE3rYK
69Idu1l/ify7yGeQ2YZsIfrHof9q5OcgP6DOZxXjEdTXKcifnXLOr2J9BPy+
Sbxf4fxGMOvQlPOpMTKGCEsy8Pfobvg4nPiNgr+F9TnK6ZR9kC/KceW6+tU2
5MenXWvCjGHE7zNyZGm2zwxE94jIvVV4rF6uHq/zqplm3ubEjGtP+yb2ZfDP
gr+TM8s4e0rGb6OYHUN8c7BxZnAMUrWOgWIhjGk5CFm+lRYaQ4Wl6pnqncpJ
5aZqXPZUL2emjfnCfvXQxfieC/+8HrYhW7fjw21QGzQ/8syg2UF49Bv580SV
sX4X/i6Hf3javqvmVfu92Xex/gf986rcQ9RLlON9udubVZ4H1CPOQva5yLr0
hnrLRQlWPA49EbkmVBsPEeMjS/1NPGGqsLWs1LmtGigvNYYIS16GXoHyMp5N
5FMv5VuJ5VUTeyqcY8o19bQvkJ+q/l7gntsFVvXP2LYwYq3mM2FivjFcWP5a
7FxTzsUZY9KMBF/11lHaWKyecj/611V6NhEGjUV2r2YAeGM4Mx9d02LPDsLb
jWWeIbSXT/JtWpWxSPvL2V8VO3dfZN/CemWxeTojXZopNFsIc3oRn2V8Wxob
c4W902OfVX/QrLe/xr1NmP4n6zuT+UY11FXjHrYk0bEswVhh7QPQg1C7MLfA
M5dmr7tiY4u+3Z30GPWaJ6HF0MS0sUyYthV/Loida8I79Ub1SPXKLPY/Ee8h
pa4/yR/Lup5vefAXYONc7j663LOHanIM63srjc2q8XtYr4rcSzRDaJa4MLGn
HJ8cGaOEVZpxN7M/Nm15YbiwvI07/ZvnmlXtbk/m+f/vAK8jti/KkU7WrfDn
Re6x6rWawTSLacb6PImBYqEeqV7ZkLFvsvkR+9bYs65ypC02hgnLhLfDIvss
3zUPXCA8w6c/Usb0ntganPGspXnpKOJxXZ1zTTU/Dfx4Pclf3U+9dhY0E7oO
uj7yfxL9N5mZ8DRzavbMgb6K/OZ6e2GGsGNW0g+E/8dFxgBhgWLWyvr72LOF
eoB6gXRIl96wGd2bY/dOYcQbVZ7ZNbtr5vqd/JuUNnaLLyzRnXQ3xUyx+7nW
uaIZL641hrUlb6C3+KHE9SO8ODnyDKtZVhjaHfvOuvu10OzIM59mP8VUsZ2d
8DRjaNb4D1c078s=
            "]], 
           PolygonBox[{{6855, 6854, 7928, 2336, 7930}, {8710, 2832, 8711, 
            7803, 7804}, {5175, 5174, 5944, 1424, 4174}, {7932, 2337, 4176, 
            5183, 5184}, {7352, 7351, 8745, 2861, 8744}, {5870, 1361, 4057, 
            5081, 5082}, {7238, 1961, 3556, 6747, 6748}, {4173, 1423, 5940, 
            5174, 5175}, {6748, 6747, 3555, 1960, 7234}, {5073, 5072, 5851, 
            1348, 4036}, {5184, 5183, 4177, 1426, 5946}, {7396, 2059, 3663, 
            6854, 6855}, {4038, 1350, 5854, 5072, 5073}, {5082, 5081, 8419, 
            2599, 8420}}]}]}, 
        {Hue[0.16458631410200386`], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJw1WGlsVFUUvtNWpsvrzNCOxQ6vr9PRuCREpC1ia4myFhWKopS2ooEirrFK
RARtEDUIMVFaREWMxK1xV1qQCCoqCNVo3AABFwqKFFAKuCGL4Pf5HX9M7rnn
3Xv27U5J423jmtKcc/NDzqVjXYPNmVnOtWL/V9S5m05xbnbKuUGBc4synZtV
4lxpH+ceAb4M61f5zp2OOxtw9nCBc/XALyl0bp2HfS/n7ks49yHuf5jtXAvu
voB9bti5NqydOJMOeBHgQXHnVoHOmJhzlaB7R4ZzFwPXgHv7caYZ3xpDWmdA
zqsizkUgzz7fuV/xiwLej3WvL/wvWCfizKmAfwM8ALzfgDyfQ7Z/sPeBfxS4
AdBrIeBSrOtzISN4hfDd+YLTsD6MO8XguzHp3LWgeRrO/wn8PMizDPjncPxG
yNsOeBHgmZD5hgx9G2y6DIEulTnO3QL4LeCHY/8e1grIcAbsfXqW9j2+fFAJ
/MCU6I4AzzrgGmDboVj/hJ0vBu+CPOiSlM1p+7Nxfj74vw0aDenC8/zv0Ost
6FIL/GeweRTwi7D5KcXOvY/vE2DzZtBbavKnFSsGFpcoLjpMx7NKdOZsrHHY
4APAzwDfhDMPAZ4L+Hro/ldY+/sBz8gQj5OBdHwcd78oFM0yo/+08aWOlLcO
cG/Yqgr3P8+ULsSPom7Ynw+aQ3GvO1+4WaB9U0K4g9D111zZh3baB/v0A530
lGLt/zhqsvUGJxx1YFxtBc1S0N/JWKbNQ5KHsdxk+6jpxzuLCyXfzb2hO2QY
Atx+8O8J5OtREcUB44G69o8Lf25ctqR/qfud8E0PeEwHjXPw7QngNoPGtYBf
AVyFOBpoOViFdZrxmgb4W5O5BzKfBDwS54fBz93Yj0YM7C6Qje8JiVc7bLEG
9l2HdVmO7E4dmev1Bt8Nuu+A10ys83zhT8KWVwGuArwH8OWw686w7JKXo/gk
rRNJnT+MmjAU53+GXhMT8mGt+bHBfED7F0KOGtDKQTyMxfk3QHMO4EsBvwp4
dol0o467YduN0HEA7pVDx2bQvQK0FkLO1bQD8NWA9+Xq7u2BfMX4Znzein0F
9tsh2xWgXwl4N+Q9B/xfD+tbnzzhd+BMWpFzSeA/Bp8J8MXLoDEVfLsKxIs8
A8h3He4fwpqdki1yUqo9a4F/Fue6feX3eORarFj154QvP7AuMZdo7zbsD1gc
MB7u8oX71PCNEd0ljcyU8iQLa11MNCoBN0PH0eDZC3AIv8GAP4Gcd4PWp9Dl
XnzfBVnrYZMY6D0E/BbgnwJ+KeCfAL8EuMX4LsBvJfAHgH8T+N9KFEvluLse
+L+Bfwf4NPKCDL/AnpOBfxf464A/aOfLcL7LU21Jh/xHQDfkKcd3JeVfxvK2
HMUl5RuTbTHK+pBQLHmgnZ2nvrM+Kt/QR+Ei1fIX01WvJ3uqQReC/9FAZzpx
dqKnGl0K/FzQW5mjnLkI+weBH4J1FeisyJYPOo3+Ll++os8eDammUodq3N1r
dWZJSvaizxjna1PyC/1TDLpTceaslPQ+Yj5dA/o+aG3xZXN+I570unJkU9pg
m+XqRLPDSF89Z77l9QUp9ZgKrH0g/wMWe+yNjD329NkWA4wF5mut1dzylGiN
oJyAZ+He875qF+mz/rdYLDDfGBctJv801L5JsPkx2KDV8DxD2gvMDsTxG33d
F/RvBm4B6Hsp1R3OGpwh6NPN+dKb+q8Iy8fErwL+I4M5d4yNaWaoj4s/6dRZ
3DP+G0G/xs5wvogAfzXrva8ewjrGnnFuH9lmPOJzisUt47fTYpsxvtrin3lA
XzAuGZ/ssZOsP81JqK71jqgeTMlW3LdTT9x9PqHawRoSKlLvp19YG673VOdZ
7xs92fuSuOYAzgMj4uq77BnLE6LdbH6njWlr2nxYTLMWZy7K2GA9rgz7gThX
arMY4Xzk4YCYaLK3s+6y7rF3jgwUY8y5VqsPrBMX4n4/3MtE/rZZrVhq+jVZ
jXVh9Vb2U8Zyi/mdecZ8YzxzJuBswDziHMaa5oqUd6szlVPRiGzMWjXcV70d
6Km3MV+nWwx/mSn9Z1rPuitQnnHOpDzTsV8J/B2B8pJnGJOMAeKrbBag3LTV
yJjmE84prFn0IWteQaZsxrnvR19+PBxIJ84ljCX2RdIb56sWMIY5g8wIpNud
WGeBbyJLc+AonHsFfKt99dd665/sjTvNjvQX+TKX3w4043HWeyyQ7osC9Rn2
G9aRw0nFQkZE8lHO72weZ88m7R04NzZb+rKPsp8OgQxdUfVA9kn2T/bFCuuF
jI0rcWaDJ9/WYK3x1TfHYO1OKobYw+vBeyFk+Brxs87XTLgWa53h3wP+tUB1
hvVmu/HdibzeHWiu3OIJR/qMyU2FstnGQs0LY0z+1oR8tzChmOqdpbiifjV2
JmaxdJrlRY3lb0NEZzfj7h++6uY1EfmaMG3+gNmWMO3L2ZfyHQuUs9978k+B
neH7gDBzmHHPObba8mKHxdhTvvy7BOuTvvA++A6PKL62ApdRJPqsDfQlfcp5
h/HI/GfuL/f1PurwNRdyPiwPJCPzlL2HuUo4XKzZlTP6fzNRmu42WT1vs/q+
OFCdZL3k24C5egj0j+PXF3QnQ5ZjBh/Feh7OtwLuH4gfeyTtw/zzLAfJgzDj
pidXsyvn5bZAvaCvzQ7MJebRkzZXc75eE1U/5zuMviV9+uyI1RXalu9S6t7h
aV5k7F4G2SqsVnAu7pchOUnrG18yMtbmWO27HLhN2IfAY2Mg+uzx7HGc7ynP
HtA5YPJzBm8MNF+F7H3B9yrtSv+wB8y1/nuGve84U6wymY8mFRtHsGb7ysHB
oHeJ1YS94HMwUK04EGiuoo3G+8o92nIZ4I6EekF7QrMv6+QKT+8HviM24Ext
TH3koK93HWcwzmJ8l1Bfvg9Yn9lvaS+unH0IH8qVT/jGqgDNx/j2i0q/qaZj
qFjvuxOBZJlieOpDvZZ7quu0J3XnO5Dnt3uKRdYH3muwmY99nDPASpt/KjDv
rYf9f8D5TUnNeO2AL42rVrNmT4qoto6O678DvruPg3835C8D/D1812lx8HG+
cnSezTbjIjrP/x6GxzQLcSYqh5zrwGsb31OB8p/z2lZ7/w/DvZ/y1Ut2cc3T
vMG547t88f0hX/WFMdsLdgrnSf5eeZqZOD8cT4oneXHeYu1jfF7tCddhc9gF
ZodBeaqD//WQmPz4tJ25LC47bMb3UXHVxGqs4+0/Fs5Njxcq154oVI1mTc4o
1hxDeWj/YVaL9kDv2ohmJM5K/D+C79b+KdVx3p0Q0X8irH2DYbOuXNm5LJAP
uyy2/gXXFHrq
            "]], PolygonBox[CompressedData["
1:eJwtlnls1UUQx7cttOX1tdDDFp7Lj/ZhPCICLbRyimA5Ra5ytaDBgneCIpcI
wSuIfwktBQTUqIgoIlIuOeRWMGDQhCIgIHKDobSIEUQwfr6Z98cmMzvHzs7O
fGfzyl8cMj7eObeX1UCrhXOVcc5tZ7MhdEEAn+xcC/jW0HHeublJzs1hb2tj
567mOTcu5Nx0bOqhh6U5VwG9Ff3iLOfWhp3Lx29L+FCGc/PR+Q79FTqruXNV
MT4XnzfxfyqbMwmkAPlJ6GFNzFfLRpxNPImsefjfluJcddS5BdiMRH4UfhP8
jVznDhBbBfz78HXe7qI7jSS2As57hfNWywbZiDSTbYO/At8Z+Zshs5HtXPid
8B8TzxHuspO9D5DFEU8NZy9u5lxpQ+fKEpxbBL0/07l9rAroStbBwHSf4U73
ko/WrBegOxFfB+JLam53Vw6Umy45lpuJ6HTNsRgV62xiLCbW4/huJ1/on+Ou
PclPNfJn2SvE32x8rEPWGx9TsO3NeVMa2J2eDNsddJdd8BV5tkR7YrhArEsj
zoWhU1mfQvfMstzoTYdzfp80i/9d7lxAfBcz7e598HkBuhr/yxOsPh7A38Fc
qx3t1UD/gE4r7PtjX0P9VKIzWL7RmQc9Dvu3FQ/2t4n/LPpF6G+EP43+cPbW
E9tm+DPwXYj/LfRz4P9CNhb7WfDTsHmU2DvA3wf/JTb9kJ9Ptfrqy/lnqK+B
yMuQJyDfC/1Qntnfib9b6N/0RmtPvs9zh07Eukr5gp5Ijq4kknP4P/F9K7C3
0xv+C13LWo9+hBqoh94esVzfgc/R5LIEn0/juzF7P0IfoGZW4S8d/R687XXu
WIr9c8QbVj0H5kv3G4P9ZPzVJVpOrnH+iVh96H77sO2eZfFUwZfgbyH+Z6Hf
i/g6ct4Q9qL4+5736UB/Foat95Sjs7lWY6q1FfjvSy5+JWdHWRs45xtWU2Iq
5f0GoNMMenfUenMHMe+Cvh2Y/zTuewn7MPkdiO7v+FsE3z7NsEM9pd5Sj6hX
1KOjiSUdeVmc5WA2ckf/34W/xvi77K3n1fuKoTG6RWGLVzk4RnwnwnY3xaBY
vmbVcfY0XK2EPop8d4L1UDG5SMywWhXm5SPvh3wQ/q6Ts93QteS4e5zVwGAf
6zF8dUHnJrnKxv7hmDwHOol4W3F2Fv5GEd+EwOy7IH8ZulPUciWdztAPZli8
eq9u9NdPEeu9u5HH4+u3sGGhcqBc/JNrZ6eTg2Ts64mvR8z/UGLr08TqTz17
hfMK0ClMMUx7BNkM3mNlyN682FuN6GzF0JFYPuP88firJWdrkR9qZrUnnzXC
Pt5rE/QX2I+ADqNzLtEwPwSd0MJiF4YMx3c+d2rLuh/dVqxDmTYbpH8w03Ki
2DeQr0nQ5fjoj+xbzh8LvcZbLOpZ9a5mkvClAv220BuRv+PsjTd76yH1kjCw
D+f96a33hBnCjr5NDMuUnzZZNtOEXaqBJO6/BJ+H8TUKn+9BD/LW+3rjseSm
Kz6aov8J8nLiuRgYVmdy5iXox9MMm7JZ17zVgGpBGCAsWK0acoa51dBtAruL
MHIv+ZgKvyXZely9Htfccq2ZEQ99PtuwVPoneftpgWGxbF6FbheYTDnaxt0m
BpZbYeoZ/N/Avgz7DGoiRG1MRr4p2TBN2CYMEZYID45kGmaKV39dSDUMFhbL
ZorwO7C36qp8QP/hrffVf8KaOfDPO8tpBbRPMyxw4jnvNWz2J9mbz4B+I2K9
Jwx4HboqYlhdDj8P+rC3XH6E/i/Q1ezNQPY3e7vhZ3h7O/mc6W0m6X31h3He
fMjXKfgl8Iu90ep59f5Sb1hxhr1l0PeQo6dC9ucJ8mwmaTYJUxfQD3vQWYj+
Dc0TvWfUZvOHqnHu3zFqs1/9o9lwLGzvqR4qot56e8NaYZiwbF0Mj9Wj0znv
88BiUQ6XQU/1sfkTstm/g3jmE08VqzCwGlWtfoXNAHS7e+s19WgP6Fvgx5gE
+8Pchj4ettml/4j+ZkO89aMw60qq1bRqWxjSjrtUwf+cbDWkWkpgrxW2XbGJ
h57kbdYoxsneME34opk0hLcfSs+VsArZL2K9FNis7oj9Se4yzJsvYdrVVMuB
cqH4e6HbK4Y32hOW7fL29pqpmq2Pebu7/gD6C7RDZ028YX576BJvWK371eG/
1ttsEeYKezXTNdt1p0vkJyVqvaI/p/6epzItVuX4MrqNoobF+oPqL7olsFoQ
Jm2E7p9l+Kn/hP4aa8L2VnqzDshHha2W9QfIR14Zsd4QRuxB9p+3v5H+SN2Q
z4za30BvOCHd/rz6++pPdZ3zz3rDCtXYaei+WYZVykE/6Kux/7H+1GW8x7KI
/f1U4y3wvzZitaueWgNd7w3L9WcuRT8lz2a/Zrpmu/5w+supJuZDL4/Y30Yz
RLNEGCgsFGY+gf3/sWm1Kg==
            "]], PolygonBox[CompressedData["
1:eJwlkMtKQlEYRhdCdCFPQZKUJoijMMgudhk4aFZUk1KnljTOt2gYFYXvUPPC
+XFQOmxSLxDWIwjmOpzBYm/+7/Jvdr7ZOrtOAPMyId1lCIUVyE5BM4CHJbiX
9wWoKG3OwqXzjPowG/uj3OccnFjyswgfenuyloKibKXhVu3IRW/OX2UvB092
7Huuq7ftXtVb8r4hF3Y2ZJCE50k4dFfHXMEHh+76cs+37Ogty6ndHbWaHX1z
PRnZXZiGf89j8y/2/Cbj3qj/z1ngG6pB7I9ydalJQu1Of1f/tvlHfbu5WIs8
B3m4mYEr/+PcnVUZA+S0LmI=
            "]]}]}, 
        {Hue[0.1858518448700878], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJw1WHtwVHcV/mWTsNndu5sl2ZLm9t677IqF8khIyAtKysOUmijYUhqahLQp
4NCHEh0Haaupih3bEp1xpJApdUZnygBWbWhCCcV2lAClRByd8TEVp2p1hKKl
pa3T4kw79fv8jn/s/M6ePfec8zuP75y7hY2Da7fGnHM7S5wrxXkycG4YjJkF
5xpqnPtOuXP1OCeqnZtV5ty5Gc6dSYs+Ct5VCedGpzm3B89vwicWd+5u6Fmf
c24IMj04T3vObQfvMzjX4ftXwV8B/Z/NSOZ28C5AVxvo13H+A59W0OdxftN3
rg96d+BcUuXcS3Dyr9AzBB8HS6R3Mib+bnx/FL48gk8n+I2Q2wH6e7W4V0x+
PgX+CU8+duG8nHLu5aRzc3GP/qxzI7jvyhrZfA/yPZBbDf8ehD8jeeeeqJWN
vThXRfhe4dxXcJcp6NmHz058+qCjA/a68OxTuEOEZ19B3MZwhxmIzzjOPb7i
tdvXPTJx3WU1dJ6H/n7wq6F7FvjPgF8F+mOgfwr6bcR/HPRtyNWbsLcV/u8D
vzejZ94G/0HoeQH0Azh78f0o5PtwphHDa+HbmUrnHoKNtbA9hHMUOg5B5nXY
vhNyPwM9gPNQUrYugv93PLMMz3aD/x4+tdD/Ps6ejPy7HCiHtLsccp8MdJcB
6P8l4tAA3u8qVV9DsPst+Pxz/PY46D7oiCG+Rdj6NXiL4ecLkLs1qzwxX3uh
r7zoXCXuXIZzfoWePeQUc/IZ91XgtSdVA+tjopmLFuRpHN8noX8p6OOg34HO
G0C/BPrTOcVyEJ/dTucXjF6U0vfHStQbvMPT0HOrp3tMQs9J1jDofsT8bvB/
DLoyVN09kFTtNRVEL8K5Amd1Sj56RdHvIz6XZuoeb+AcQzzmQa7FSX55UjXp
8HwvZL4GHz4qyC7tM5/L7b48+Qz1rzSaz57CM3shdxdi/iFsLAP/A5y/j0uO
MoMx1SfjznwwL5dwxznok9NJ1SJ75kxSNcp+rUsq7xPIywLQrXj2IvR+Anre
SasG6+mH5eQGy9EFyMwFfX6mdLIfR51+X2Yy21L6zrv8ICa8Yl7uQZx/gvNq
xDkJ/3bBhoezErW0CLqOFlXLfaWqi/FAvbbfl46tlt/74f+pmPqo2zBqM+Kz
KaNYdQITWmrEJ4adqxUmEBuIGaSfgNzSKtXSBtTtnaiDA4iFgw8fBOKz1hrh
V0NCmMT6ZR2yhktxhxDyNfD9OPCiDr9NIm77DEOOgH814wP5/U54RLtrcvq9
GX4swDPHZoj+IWppY051yHocyMjHt+DXlpxspvLCLPY180Qs3V4mPG8M1WP1
OAdy6sd1WflBe8S2E2n5SX9PJtT/N+L7afxWB/31sPUn0IvYf/DhYIVqpQMy
WegtIBe/Qi7+HSgO7MvaUPX2G/DnhKqvP/jCStZkmFFtrzeMHTIcK8+oxlhf
9IF2WI+09WSg2bQLsl053bEzJzxg7pn3HTZrqqCnGKrGfwve2bTqahnuct90
1dKTyOnDSemZNDy7Ki4sIMaTZl3VWwybcf7IsP6gL1yZYTLvBppd/bD7nC9d
h4mBKflGH1tAj5QIQ45b7f7CV1wYn/nQf9awiJh01lds/8UZkRa2ryX+51V7
E/D/FtznArDpLsjeFgn7N/uKO+MfQudu5COC//FQeaLOXKi4MD7XhsJ34vyn
AtUj65N1tsmX/pvBHyuqv/qy8pv+r8J9e7Pi83fi61bD2LqE6oFxqUeejoDu
hGx5KH864JeXl1wyr9iwnxgf6qB+5vSwxbMZthYktCcwX5ci9dJi2D0RKF/P
+ppp/J3171dIJ3VfNnk+d8p41E9sP2nyX/e1M3zDV46Z69kZYQ0x54Cv+mMd
Ps6YG84QV3IF7TQj4F9XEMYdAf1WSjOe+Y8ZPpTgrAqFe8Q/4gX5W2BrVqh9
4T5PtUwcJ4bPS6gOiasbDdM4B5pC4cDnIf/9QPJp2H800HzhnJkb6rnPQeaU
9Xu3L4wjpt2cU2+wR1KB+oPzmL1JvD9mPdlm/cjeZL9SP2fNHRnlmX3wIjAr
Ar8E9Eyc360Qjmz01G/tBe0Q3CVeBq5MVWqfeRX0xUBY92GkPZU76vPgd9qe
1oFzYWQ6cc5OaG/hTtUbaV4972lP5S42Bn1rwG8CfcTTjkK8juc14zlzj4E/
P9B87gavNhDWdYGOV+kuvFMMdZZBDkuL2r3o84vwbYPp5B7UYX6ujCTLGcpZ
ytnDfLVD35cjYTV3Mc7bibhiyjlDPn16I1BtuLx2Yca+03yib8956iX21Pyc
apazn7ngnOYc+BL8+eJ0zd2H4PP9gXYS7ibzbFfknRfYfsjYrbDdi7bKrE+J
H/dkRLN3J4vauU/gfDctbN5mvcKdivh1Taic3As/7whUP/2BMJ9102O2yKe9
ScRiD/QviXSXPttb2PfsI2Is99cx8/lcID77rCMrzPgjbF1JKd68y7pA8pfT
6tdN9q5xC/ij3IXSwowh20M+ioSNxF3uKe02n56uVg0MY19oCqSbtfZIoJhP
z2imcrZuzmnfJb0CdEOkeT4NeW/IagetR9zaUQ+70F9La9SH7McmyHYFqtU2
3GVxpPrnextxnT4347eeQDVzO85m24e5Fx8OhD/EId6VNO/bnVWflKKWWoqa
Sa1F2/Pi6mVi26Dt82sj2Znw1A+M91FPPcd+5n22+MpHHWzeC/qfoFsC5ZLY
QdzgHKLfswPNJ86RWYHeizhrruF7RyQ91Md6YK3TH85m6lnqaRYRtzmP1gTS
w7k0jHs4T7ad5Z50W1G7VV1O73Xsx8OedtLrU8LRhQnNHWIWsZkY/ZjtceQT
T4m1lGVvXzFbrC2ew1ZndYZFjZHmDucTZw937OsSwnHu2nOMfrao/XhaXnhN
O9zjXqkWnhALN0S6B+PKGcDnZofKP3fsZsNx4nlDKAzus55iT4/auwZ7+pDt
8JwHnAsP++pJ9mYhFB6wH7us5lh7q1njFhPOrPK8/C/L612B/tM24znPaPYG
e2R/tfYp/qfAecr36SnLCzGd2P6qxW/K3rWJccS6P3ua+29aLlpsbnJGExcp
S2y8vqg8LimqR1eZ/8Q74t62SPq/bTlKovcOopbGPc19vlNw9nOPWGg1sNPe
/f/3DhbTfkX/+e5B+b/h2enwswn0QFZ1yl2ZtXol0J7xn0A7y7i9g3w8UK7Y
T0Xra84iyjbauwMxn/s0MZT1wnf/Z+y+B4z/F8zBm4AVr+FM2F0qqrT/0c/X
POEvZbdH6lHu9uxTxoCxYFyGLd6kRyy+9JN5brWYt1rOiadT9ixzR37b//Pi
aQbdxPsVxb8RMfkvb5xJYA==
            "]], PolygonBox[CompressedData["
1:eJwtl2lslGUQxx9aeux2uy3bQml5d0srUoRSKG0pV+WQcilnhFKuIpdXYvUD
ckQQkAheiQcWWkw0gQCinJXDglFayhE1GhMSQFEwyo0WD8CI1N8/sx/e7Mwz
88z9zMzmzKme9EyMc+5rvrZ889KdO8zBR8BzgBuznKsHf7WNc0eAr3nO5SQY
/QpwJ76L8c4VgWcCr4anGv7p8L8EvJUvCP/L0L8KOLcefBn0udBrgP/gzhHw
deAzgtwDPwh/OXgF8Gy+Q+AjRAd+kTvT4J8Evhy4DWcR8ALw5mR+wa9gT1/0
5QOf7gAdxzrD83mKcw9mOPdOnPk4G/+mwDMYeDj3/+T+BM6OgdeBz8WeR6J4
Lfhs8GHcXx9n+MCQc9ux4TXo1eAfAp9Ic65Q9qD/OPAF9I+Evytnp8HXwROD
P4tEJx5/o78R2rvcn4X8c2nGq3h+D5wH/TL+lIDfD3yDL5f7H4NfB16JvFvQ
nwBvQl5dpnNrwUeD30b3fujvI28Z8vcBt+Dj3gSL0ZPgXZBxCbgY/lzgspD5
Xuxzrl22c+lhy3ezH79znHuqnXNHoa3hzgZ0Xe9M7JCfkuRcXK5zn2JDKbJ2
w78K/rII9xKJOTL8yB8IvZffcjwNfLxnvnXn7BKyBkAvAC4lZ7/ifz76u8B7
krONyPuWHG5D3la+KmT/w/0s4PXYfAZ/hsGzBt4wZ7HcLeHLB96NjmLgqank
CHoL9jZib1fO7kP+cc7quHsInQ18I5E9iu8n7NnB3WPQN0APhy3+wmvBL3Y2
23dxNlG5Au/htxg/6imoZms/wFb4m3JNd3diuAc4lhjn+UyHdC2DZ4ff3tRY
9C+P4srPGNU/+E6/5Wwi9F7IKELeK/hfTv2siNIVU8V2S5q9j556v+T+GPx3
kixHxdD7g3dE/xbwfsof/F2IfTk120ys6zh7Hf6HuH8F35ag87D8gecSvNc4
64m+IDwx8N5GZib0GvhPk49NnG2GdhV7Z3C3GLwUfBP6hpOL1GyrNdXcHOxf
Dn0h9ApsvoX+UvD+SdaDSnKsplRbqt9K5B0M2FvfxdlKaHexZzDwg3z/Ao9A
R3vkL8LeMbzlq5wdSDSf5NvvEXvLikEL8ADOBiZZjahWGgKWO/kgXwrJ/y5n
NdUH2If9PX3m8y18bxO22lMNzuduIvQePpM5kPsJ2dbrdCZa21x7O9OJ9y/4
G+Ssj89q+o5nMVQsCzlLhnYhYLB4xFuJjb2Bj8ViO2+3OGK9sIb7gyIWQ8Uy
DR0B5SfF4KHYd49YJGXb2yhARiDbaki11A+eEviPwP8FXwmy+vK1haebz97M
d9jWioxhyDoFvgZ7J0T7iWpQtXggYLUoXLVbxLdE7wWebzKtR6lXKWf/IWt/
wGpdNa+3MCBivsinJur34ei8EV1voxvfs8DVfHnAfeB/M9HqvRD4TMBqTTqL
c6xHqFcU4UMKvlQQvwd85lMceHy2vU31nFNZlkPlchn1U0H9lKdabFTDquUf
A9aL1R9rkN8rYr1fNvQGXsw3JMbezFLgphTrh9vIl498lXFntd9mgGaBali1
rJ4/OWI9V7KlIxS2nq3ar8e+m8QjL2izRzP1E+6HgzZbNYPfAw8FbRZrZq4F
jwva7FTPXgy+IMt07Ubeb8jbA94euAPfXuCLadaL1XPVe88FbPZrfvYPWYwU
qzTo05Dtz7ZaUk2qNhdFbLYqBorFwoj1Es3c54Ebky236lHb0TUiaLuGZtZZ
z3Kq3KrHFaZazan2QuirhHccOVna1mbyTOglQZt1mslHud/iGa967BToBenW
6/ZD7wV80zPbVQOqhSTPZpVypFxN9izW6nHqdZM8i5V6vHr929Twqnib+V9i
/76AzW7N8GTiMx2ZzfIdG6uwra9nvVA9WL1YPUq9Sj3vOWbrzKDtAtqJ/vJs
x1B/0g4yCPixoPVK4Xc9m8GaxZr5tcCD0D891namKuhnODsRYzE6m2k1qnrS
TG8l/lPTrbZV45qd9VmWe70pva1WZNzTjgQ8JMd6hnqH3rzefmLIalnz4ocO
9qb1ttVz1XvjQ/YWld+EkMVAsVBP74v/4+F5i7svcDYZW4ZG90/taGUZNrN0
vwS8AfkfpBisnW4z8X4cfxfwzeJeFV//DJMnn+ajqzLqn86ka3S6zQK9uTnc
y0+3WngDemGGzTz5Ip/82PtZdB/TDne+g+0I2hV2kuMuvMfYXJt9mimaLdoR
tBtoR4jhLcwLmm/SL9tqo3TN+07cv5xms1Q7lXYr7TjadTRjuoctprJHM/lk
ss0IzQrl+Gn4R3pWb+qJo4B/DlhvU81NS7WdWbtzA/bMAt7r2e6pnbweuM6z
3VE76UbgsZ71X/XwccApYXvvqpdU4I5h60XyLxM4LxyNBXg37Yph801vNBe4
PmCx1HvSLng+YLNKM1Oz80ay7U7qQepFjZ79V1APagKeyncgwXZC7YYzPfNF
O6R2Sf1H0H8F8VQCtwvaLNJOvAJ5/wPwlK2I
            "]], 
           PolygonBox[{{8512, 8511, 8513, 1148, 5206}, {8516, 2078, 7428, 
            3174, 3175}, {4192, 2356, 7952, 7422, 7423}, {5215, 5214, 5948, 
            1427, 5950}, {5856, 1351, 5855, 5050, 5051}, {5048, 1060, 7737, 
            4032, 4033}, {3687, 2077, 7426, 6856, 6857}, {7734, 7733, 7740, 
            2198, 4034}, {6745, 6744, 7180, 1939, 3532}, {7746, 2201, 7750, 
            6744, 6745}, {7752, 7751, 3252, 2201, 7753}, {6857, 6856, 7431, 
            2078, 3689}}]}]}, 
        {Hue[0.20711737563817145`], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJw1mFtwldUVxzeYEHJuCTkhIeGcHM5BLnJTqFwCjLXSVii2gKByEYKoZZy2
XsB2wEApaof4ANOHDgJBwlVQO06RcLUOEFoY7EORNhAoULUtT07bmdqinXbs
7z//7cOXtb511l573df6Ulz2zINP9w4hPNsrhNuA59Mh3Al+rS6Ek1UhTCsP
oQf8tnwIv4XxvmIImxtDKK8I4VXgtBrTn6wO4eFazoPfC89Xa4y3QL+aC6Gi
bwjfzITwBmf6cfZN4B7uOQPPQe49zXsT9C7gQs4cgvZxijP1IbSWhTAH2fkK
y9nMbzMHhXChEnnc1ZIM4afgBejH+bMBfHg/04SnuWM8fK2JECaWQqgH1vGM
4v5H0O0IchcBH+U5Dr4UeE9TCFu4617gYXQaAP0IcAbv26BPB7bAN4U7p6Ln
UeTfQOYx4FF06I/s1fjyFO/PocNmaCX425FzO3Ac/hyNnLHAf+fsg0p4RoF3
wDMG+JXI8wJ+Kx/IGeh9gGt534v8f6JPK/gYeMZwdgf8D4A3ELcO8P8i8350
WIoPXyeOjwHvzpt/PPDX3HELmeORUV9hfANnTuLPLcjvBP8957dAb4S3IWd8
IPBS2rYMBh9SYX1kwxDet/M+DPhimeOrOHfy/jfRuau6wvgq+K+kzT+U36uw
YSj4FexKFyy3B/xq2j4ZDc/MvrYRE0MrMf4H8t+qtn3LSeDLvN/gvR/4IWLd
iZyX8f8x4M95mqDPhf48tBU853o7NopRGnlrgWt4/oP81/K+b2fe+aK8Ieyh
o+BzlxtCWEI8xqJbGXAeflvJ2cOqp0rLVAzmJv1+M9ge2XULW3ZC7+Dpgr4L
uDviX5AzKfBQMn0HzxleLyYdG71fjGdVJ4KSJdu/hw3TgH+pcn5L79HBZ3ZF
+a/xWwL8f0X7b1eUPw6dRvL+O35/kji1c76ZnJmBHgOQc5GaW1LveE6nvjck
LXsqz4P15v8a9L3KX+RM4n1xtX31Her3FfjbeJp7WecdUZ/mePaJjPWW/mUl
1+sLCefiPN6vgx9B5yVRpuIwB9rnfUJ4KrjXqOcsqnWsBsR4/TXLHcDJKdtd
H2v/u9FG6f4YZ9aRr9+Htr7gntGBLmsytld2Ky+Vn5/jp5aM9VrEnZeQ151w
zi2rt03ruesPvV0DOj+CHBpBLrWj/0rODgHPQavhKYG/Cv1T7Hgf+TM5P6/R
/ruRdn8SPhn6aGRO7GV71iTcM/cFn5ecWuR9hpxL0BdCL8dvY+H7hNhNyjk2
q+A9g20lZCWhXeCOIej5K/y0Dxl7+zoP3s2a/mGd+6Lipn53EHqR3zeR/xOa
jJ9G3gnlHL//MuVepbr4KNhm2T4K3X6W92/qZzsTxsWzKmfby/HNwpxtnYKc
rUX7Ks+5beDDwYeCd2Wt4/VB9seo3vZJW8621yDnuYT7tuaFZk517G+z0XkH
cmY1+ff6yLOuaPpR7l2U8IxTj9pEzmxMOi/XwrMdniPwzOP8TvC5TeYti/yP
ZzyzZpNT3Zw7kHTeLE9YD+kwq9Y8mm93o/Nu6GdLzuXPYj7L3/K7fKEYKBbv
Yfc05Pyrj+P7A+76CfTHkbes1vgTwH3wFcBbG8z7aeQ/nTb99axzSrklv3VV
OY6K5x/T1mc8epXnnCfd+HlEmfNDfl/S5DxZBPxxo+9YB5wTfStfvtRoe14G
jiy4HlZQLwvg2Q3Pi/A8GuXswfYG4no7+IC8/aV+9k6wX6TPBHQZzG/D4Plh
xvWtmlONV0Mvai4A+0X8GXg2JVyDunt1xnk4kt8H5p1Xyq9nM66drO7PO8eU
az/KGB+imspZlwx2LMOGdubNt4jdQzEH1sN/B3x3gK/iXI/6Mc817h8e6cOA
+YGeQZpF99S757TUuverD6sfN0Y/rMjYL/LPCfLtQpXr/yaxm5hzzt8gLvOj
Px8Bbof+Mb7KZ6yTdDuWcm6KrryqrHFM1QMGo9/IMvdr9ZJ87CeKjWQeVx9D
r/1Jz61O4OGk+6dmlHJidOz1kqFc/XaTa0S1UorxKgJncG83PM9Xe1/ojruf
5vnDcaZPrvHOsACep1PupeqpH1R63/tyxgsqHkvizqbdraXJushPC+Jep/3u
VJybmpV3JVzHmlkPRD1naqeDvlUzTvMMHc4hf0qNdyXlkPJH/Uj2Lc55V5Pu
H6bc+1Q7x7Lur/KpfKEc0MxSvA/EeS3dNfe0W2nmqq4Ui0NZ8/bEnNGerb16
fq33ac21L7Q/JpxXknkt4tJZsCfSp0T978NvKfS8E78lC9ahO/pBc/h80jO8
I+4T0kv5Lb9+hF1votMg4tuVdt3KB0+hz8qIq6Z71XnXXQXP/KR34L8Hx09x
TBScM7pLs0G1KH3027n4rfF+neNzMeqmXFPOSQ/t94r7J+izusFzWfNZ8Rdd
eXQq7Xx8t8oxVCxVR5on4xKep4pHc5yho2K+qu9tL3hn21pwLo+M8zWND9/g
jsMp+13+X4pNqUhP1nj+az9RLPVdonmjOfJWwXvkyaLvHxt1ELwr4m3R91Ni
To6NeakdRXrNz7m3dccdRjNV/huWsi2q2eZ4v/Yk1WxnrEvtZJfYA+vB3+5v
GdpRtH9exYeH6clXGpwz7THn26PfhGuuK59/Qfyr+nlX3lawvp1x52uIu7Js
1bzVTNJ80W6hGmiOfUj7mXqOdFwT9dTur/mqWXkrzkXNxL1Zx3cncXwHOZeh
z6L/9eeOCdxVW/BOL7/8iVgsjTub+ujZrH3ym6y/u5STys1DUY7kbY15obrT
98IHsZ9cTzvml+vMq339ZozRKzFv5ZupsT9r51CeaF9WrkqG8lB9TT1tUt5w
T/wmUm6fit9UO2IvUs6cj/6UX1vTjld7wXFti7mh/q58PZM138ZI70LXSdiw
p8py2qKeU0vW8+1q90LltGx7qOgYzy653lR3Z9NajNwzNJcmlKyjdtuNUS/1
SX0n6dtG3zX6NlKdq8aVU5djXi0nL9vAv160H3XntbRnRWfU7UDsJ+/V+RG+
P+v/HajXVeb9fwfp1rfGuSufyDfy8f7YEzSHhO+N3xEHYt84UefdRjuO9ocD
sd9+I+3vucUDXWMbo13qt9divxJt05c+T/g30e+P+aZvyp4G99U/Y+vBou2f
XvL3pf4Hof8//B8kCUFi
            "]], PolygonBox[CompressedData["
1:eJwtlllsFVQQhk9LC23v1k0uLffe9hZqWYoGFAREBStCFQEBCYKsooiAe6KG
zQXjbnxBkaItiygYTRBaKmpEQBAFFcMWIqgYfUJj4gZGo9/P34dJZs7MmTNn
zsw/Jzvn7gl35YYQvoDyoIk1IWQ6hXCyKIRJ8I3JEJryQ1iM8tZ4CLcUh/AS
8j5shpWGMBqbo9iWII+Cn4R+Jfrl2M8qD2FFZQjnOodwIzaxbAgjkt4vf+PQ
Z9Mh1BWE8Cz6O6Mh9IKWYV+F/vWyEIYn7e8R5EWcvw1/yS4hdINa4evY35v9
z7F/AXtPdyUm7Gux/yoWwpBUCBuwHZxDbNhfRoyLsV2FPAj+wZIQjpGAlgiE
PA46VuQ7bSHeK7njFVBJVQilUAS6uDCEx/A/j/iLkHfnei0KX0g8nyMPQr4A
+RXofvhJ+I9z1qPEuIs8r0Ney1ntnHGKs6Ygd0M/grOacuyjAb4O+3rsn0b/
CvaXZ0IYCu3mbnug6dxvKPr3uOMM+F3cMQO/BJ+D8H2mOoT+8AOgn6sdg2K5
j5hWEVsUeWLEd96K/YX4WMP+ZnJ6IBHCTvylu9jnx/Bj8HGIvRvJ8Sze5jfW
NhDvV6xdj24Pb9aH3ETx+R/+lqP/g/dswH9A/gR9X/Q9kPtztzeQq/P85nr7
vzi/lrO2YP4n/EBoHfJ64vmCePKpgc+Qf8d+Kb6/LXbtdcNfI/nJ645f9AOg
F3mLKewfgq825JtTzrFyvYR4N3P/4eRyFb5ryHc++q+r7SsJHYLvx1oze9di
c5DzN5a5NhXvsxXUGm+0nvsfYX8j/Ny4328/8mTqI8Z593LWPdBKzjsTda6U
Q+WyEv+r8N+E/0/xfw75QuR3ifksfCt7nsB2JjHXlZjEr2BtG7o7OW8+lM9d
O0NNrCVzXHNr4MeTk6Yi93Rg7yhq5p/gmHbyHm2V7qV7semNPJaY9+W6Pl5m
/7SUc6cam6p4iH9TJ8d7Hbn7gJiH5PhN95KbzfgrwX4e/qrx90GZe3E19vuw
7YGPJvSvIn+OvDBurFCPq9d3xVwPg5E/ppdnllv/FP7mcfaslGv9cuKZCR8p
dTzqefW+elK9+QL2i7B/mXjysZ+GXE48PxFPv1zXxI/wP0SNZcIkYVOyyr2r
/utEPtPEd5r9edDKSr+R7q4zo6W+o+76F/o9KWOQsKgXNj3ZP7fc2KX7CRvb
Ot4zhv8NnL+d9zkccc3Hqtyz6l1h1ED4UVljozCyB/7m4+9wrmtuCbHtxkc9
8mXIJ8ndhx35Vj72E+uUct9FNXlb3G+st+6CvxPEOzjt2lUPL0XfXuXaugB5
O/xxctqAL9iwHt+fkYP9la451d7WMvfOxdjv4/zRWd9fmNwb3w3UyNXQzeyZ
CiVYy6J7Gps7yFUbtKbA9TA245pSftUTFcQ3OuPa0Z3e56w6zvwFXTH0Jv7e
IafDyN9qzSvObkk4t+rRHV3dw+rlImxeRTc7aewS5gv728n/kYh7LsEl38Lf
r7n2OazGNaPa0ZnbUr6D7nKAux6E5hP/M+hriLGUu12btdwTuRJ5NT4fKHRP
zSg25gn7zs8k/H2E/VL0f5PfkTFjkrBJaxUlnpmanarBNdjnEVNDrjE9v8aY
LmwXJj6Ucs+qd1vxd0O5Z4xmje60GH9NyC9E7GNBiWeeZp9m0l3E9i7yTuSt
6nfivbHcs1p/gDnFxnBh+VHOeyrlmaTZJAwQFhSUuhZUE4Xwe2OWs8hbyozZ
wm7NhGXwDVn3tnp8tnqXtbOd/Wd4HH5k1rWimilJ+4+gfqhF7o58KubZfr4H
Up5Zml2vQeMzrjHtVw/Owf83MfdKX+x3Ec9IbK7pqFHVqnpcvS7MeAl+Wrmx
XP1zO7V3Efm9qMA9eL/yUeNZJ0yZyf4vE/a9AZsZyJGUc6EZcxXy29i3RjzT
dyRc86p9YWINtvWsTUYeozsI07t7lrVwh7nkohF6Hr4f+kvQD4saC/WmetuK
hPder55CXxr3Wymnym3/tPfKx8Koe1q9LUwSNl2dNB6qXqdzv17UyJOF1msW
NXf0l9beq/IfQvWmGk9gO76jXoSn+itO7+7a1kyeAX8H8cyLG0OEJYsr3Kvy
+TD8jqhz9zo0ndwMjBtb9efT3+/7qGejMFPYOTnj2awZXa/ZgH5dgf8LUzMm
8fpDXIq+vcy1qJrcH/Of4rwemoLtsQrfXTk4XmEMFZYK72PU8+moe0OYIey4
Nm4s1R9Jf6W2rP/O+tNtz/qPoL+CZtrmMs8kzSbV0KW8xYSM61V/rtqUMU3Y
phm6qdJ/Bv0d9EfTX01vprfrw54+7O+WNtYIc4RF30X9d9KfdGipZ6zqSxg7
hrO2R90bOlNnTyv2X1g9r95/H/v6HNeoavXfrLFTazvJV9+0z1YMqsVbO+ab
eky9KgwWFuvPcVPWGCQsaiUHJ8jF+oRnu/LxJvkoSxs7Fb+wsyXt2tUfpTnt
GlAt6E+pv2Uq7d4XBmg26k+m92+BJmFbm/bs1QzSLGqPWicb1cr/ccOpcA==

            "]], PolygonBox[CompressedData["
1:eJwlkW0rg2EUx/8pj7WZWZaHTbc8jBgpS2R7YV6MJCTJQyzaokxEHr6Aj7Bs
oeWlL2GUlIkmwpfxu7pe/DrX9T//65xzn9tJZhb2KyS1QSWcuqXeGikUkL5a
pG84RxtAG0YbhCFYDUp3aGvEXTx7cIivE62Z/Dv3DzhG60HrQCtz/4Q0pCBM
05tq6dclLVOngG8laHPG8wYl8PG2g9yB285j5upH60M7Q3uul644J3gbhyl4
ouYjPDRJo3xYkXjfKDl8bBH/GJ7xoJ3RzBqgXhc1jqg3h37NeZ64RS4JM5zz
aLPEde4bMO2XctROECe8UhRK9HyFGL4s/ijR2y41wKZHeqF/zGv3ZfYWYQcF
dvDnsrsxO+pmlhBvT9x212bnIxBGu0BbpOYt5yXiNv4dqCJfCXFHuqyTJh07
t5m/kx45eny57Nxm/la0LFoZzcdskVrJT0xRP+22NU3tHnx5fD/4MugOfT0B
+1/M//kH5mBInA==
            "]]}]}, 
        {Hue[0.2283829064062554], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJw1mHmMFdQVxq8MjMzMe7Mz63vz3htFZgBZRBFiQwcQhs1gWWqrQjraWmAU
Wtlqsca2iUkTsU0TE7QsM2qx7KGlLEUrFZxaWUeGHYFK/aNUk5bW1iZV+vv4
Ln+83PPuO/fcs37n3Jd7ZNGMhb1CCD+5KYQ81kR5CP3ZeLckhCeKQ1jDfkt1
CMuhO6C/Dr22MoR98D6TCOHBuhCGsT++gf10CN3Qgzk7ge+3IueP0O9UhdDY
O4StFayFITRDD+T86WQId8J/nN+PQQ+H/hB6e4X5u9hbnQ1hVZ8Q7uXeoX3h
ReYr8C0vC2EeCrex31Nn3ZaiYzf0OugnoY9Ar4VeBP1mvxAOcOd21h/wfRiy
RqHvq9BjoZdCr0bXZdCfQw9i7eauTs5Px96dnB3LXd8uRSb6zIR+mM+r0HNY
13HmPs50sM7k3sv5IVyrD2Eu9B3ImIo/vlVne2dCtzbio6IQJrHuxeaRyFlZ
E8Lb0DlsP4DtP0PWRGT2Rk5vfJ3H5zxnDmL3hALH4HXOLeD7aXS9jbWezz/Y
X1Vou/4Q7LexBfbdV262zL3o8WLGZ5L4srPEOvwcHaZwxwL45/PZCM9geGrg
eZu4NKHbeXSbhy13IeMBbLkG/wdFlqn4/4nPZ8Hr0KjPh4W+e0ie/aR9/f4I
ckbIx8jpn+e7PoV/Q5G/i9bekEjfi07jCpwD22NMN7EOS3vv+8RzRZl90olv
9+DPO7FrO3aM4K6zxOVZ6AvIaOOzGL4Pks7J/dg3ro9trMNXCxPOsY5Gx0Nx
uQc9p0Wde9j7rJZzyPwv6y7kPofM3axdyEoj4w38eoaa+gQ5R9FxHvqt5mwl
PItLbc8Q6CX8djv++ReyV5NvJzm7lN838JkBz33wnOOOndx1nrWKz8vo2kru
jUH+u8ifAj2+znV0BN3uTpGfyLwAPSbW6XvQfcpt3y50W59nPQfx26k65/v3
0HEffGns/TwXQjv7I9l/CNt38H0cMkfVO4a3xfiuyVg36dhV5NxRLo6G9wT7
V7njJPuLChzXVfAPYC0mViPTztG75YNYe0PSvkd5JPm/yfmuBPyt7P89z+f3
I3NikWN5gDgdJ8+2wTsr5zu3ljoGsvElfm+LOSM8eDRn3QZi36E+5u/mt1mx
fkfjv/HVxh/h0NUi12w7d/2S+LIVmhLO/yS6fMH3uaXmfxn7RnMHX0MBPD9F
70uca+fQr3LO4b+xvx16Kueno9tK7H6hr2MhfVdGekyDY3eYmAxuMM+eEmOr
MPaNCuskH3zEfZ34Z31fx0z+kx8/Ca5p0fLn3AbzHC1xDehsUS/rLv/Kt4f5
rZm92/HDEeiB0HelnI/78o05tWWuT+GEam5/3FfdiEf4o1gtLbDMjcTnednF
/vKcdR2BzEPIbxKGQR+L2KV6UB9SP6pLOadkg/Q/yP4A9m9hf1HC+Nyv1riu
c8JG5cL86JNDNfbBr8GDM7HvCI9PJl3LwqGjsQephmRrx8324bCU6aGs55Le
a485ovpSLzsR5QgbRqVs33D0mpA09r2Frc3sr4G/ifV40n1B/eFNYn+BHPg9
awN19VfODhAm8bkC3Vjvj+gm9qYVua6Ur5ugN8bvykXl5Ovkw8Gkc0Z1/368
a1Kda3J+9OEX9da9qcG5JX71c8VcegrfQ5nvux/dlmHDWvYHpVzrO/Lt9wUR
097j7HeL3XM/gl5c7F6snvw4hXAEuVXU9Xcij/pzO/uH2U+mjZFz5PM8+04+
fAdblsXZQ31+SZR5BXplmXN3KzFtjzqcZX9hnFsuQT+B/KPIz6Sdmz0Fzs/Z
2DMbux5gnZZ1nn7MneuxsQWeK9AzsuZ/OtbuhdgvFrB/EfqFMvdU8Qs3lQua
b274VOu2hM9djHnYFuWIPl1rH56qdX9Tf1QPXVHsXqaeJn9fr7ub3HvUgzZX
OPbCLuFVV8QkyVRvU4+7A9tT8DwJjZjwo4R5f1ftnBEOK89KylyXwuPVGdfp
LzKeg3RW+KM1FXvEknzLV55tKIwYJXszxm3h90J8fgz+xyo9p6gmVY9PFdtP
6jOyK1to285lnXP7sOts1jiQJcc2N0aswO659fbPHNZTWeNeX3jOZI0D1dCn
s8aKMtH0uI+FyWDw2aT9p5llU4V9OLLOM4Fmg91V7gHyZwb5J/jewn5PlXuk
emUn57qzxsj3WffEs+tKnEfLCxxLzRGaIXRGvUo9S3OW/C7/v5iw3R0xrj2F
xinFTnOwcOlU0vnSE/dnNdg/wmPhguKWRc/BGfcR9RPFc0acmb7U6H62iTg0
Z5yfyutjWcdyWa3nOeH27px7sHLgJelZ4lhvaXQuaq7T3CV8Ec7IR6ox1VpN
xjWmWktlzHs+8j9GrJ/BFw+RA68lnIN1rDsyru8B3HkQe+9Bzw3cWZY2PkzI
eU7Q/HcdB8vM/1vOfbXRuHNj1pDf5fPp1b7r4UpjnLCuGz/tytkfO3OuW8VO
ejyNbj+Gf36l3xvC/CLyZXzOWJQP07b4BtHbRfNgS4zp1DgDCEdrM+YXhuUy
xhnhjd4JwsXLCeeZ8m1LhXuPetDwpGc7zXjrKj0PXy70PFUT57q2Ur+1hHsT
y63va3185msNzh315MmNnn8uwr+lyvbJ338ud9/tQK+2Susp+xpSrhfVjbBI
Z+WXfTnr0IpuD1ban/LriLQxbjK/T2vwWfVevSda4ptiTYllqD6ECUVFxoVZ
jc7JmY2eDZSTqgH1dvV4Ya7eG3p36A3UFPvj+azjrbg3lfn9qRx7vNi1MiXO
l8NTnh80R7xVYdwQftzfYFozheYQvZGE+d+o9p3C+4EpY5B6WnPab71J0HVp
x3Ei9C1p41grdGu5eRbh5/4Z7wvn1Lc3xJkmnXEOq9fpvaZ60EyoubEr5oxw
XnWlGlHNboq9W/Wmuttb4j6q+tJbQXI1M2nWUPz19lMOXInv3Ftj3fWOb0PZ
ID37o/uatN9YtSV+e6i/ni33XDYvvhk/LbVPNTvrfSk50lk8q2KMpINsFM4/
X2Ps/3fG9+mM5pLm+GZSz9MbSHeNvFFzvZ2X/4vzcK8qz8vX4pvxxltRM8lm
eFbx26kyY8DJiGn6r0E9ZDGCSlLGf/WBp2rdk1bUui6vRj93RVp9sZmzz8Lz
SqPvlg6azb8c303lGeeTzghvFW/FN5X2+0r1qLpUvE5GXPpP7LN6UypXlDMV
8LdEmX9JGMuUD49Weq5Rv5BPZse3id4o38zZF/n1rpnrb7FgrN0U75qa9Uz7
zzrPMKol1VFnrKsfJpw7essNirOX5qtsxm8eyRyQ8DtWcdd/J8qZazE/hRHC
ikvlrnPV9KC045aKmKmcU+4pBvKXbNS7U7Wu94h0l6/3x7fY5HLzTyr3fyTC
L8nol3KPVq/+P4OdggY=
            "]], PolygonBox[CompressedData["
1:eJwtl1dwlFUUx69CQkKyGzYLCZuym11q6EURRmeEQChiwQA2BAVGRVRQmiDq
WGZ8AvRBHUBIUBAMIEUYwEqwV3oTMaL4YsGxYZkR9Pf3vw935pzv1Hvq/dJT
ZtbNuDCEcILTkjO8NITlOSHsAL6mbQgNnKMwNIHXA/dKhTAsP4QXLghhYTSE
r9ogUxDCO5xtmRCugl4H/Tgy86CtquRbXggfwb8SeExZCBcLbhVCdUUI5/g2
D3p3vu2OhFABvh/ZBvDZ6E+Xh3AW2yfR/wb6x3LqgGdi42lsHawKoeBC+zAK
2vx0COtbow+Zgegfgc7Tre1DA7q7cw7B/zz6F6B/IvddneM7ruB+V6PjCnQd
QuYs/ndHR30r+yzf78LeKWzPbhHC4lgIvaGvgl4Ff+/CEPqDPw8+AP46+HOx
95l0g0+P+ptokukD798JYpcbwgH8fQz5XdzpCfQPQP924L74fwZaDfzbuVs/
5E/AP4fzALK7+fYNtnvBvwH+GDo7Ya8vNvYh+yzferdwDJrgHci3Eehayp2H
cveJxPfaVtZRC60pTl6Qvwj54+BV6OsK3h/8CPhJbO7IdX3MxN9nCu37Eb5N
Rf+LxG898fuOb0l0L0zYV8IWXkT39dDHF1jHdRnnVLn9Hno1+kux1wV7/bB3
EPwY8tvhvZ+YNHCX89gogL8Rf3cVhfBHyroVkz+BTxfaN8kcR3YqOd2LvpXo
u4f4/4tPp6F1g+c8cJz87INeD/1e6J3AD4CvAp8XtQ3Zasbmm/haVe67NYKv
AW/Gx9WtrHMcuRlUYVg1qFq8EfpE6GfIwefFIaTKHSvFSLF6K2Pdi6jPjcC9
VKN5rs+f0HcJeO8899sv4FvQeRjdXxGP6Vy8jPvCEmahcz/4j+B7wPfD05h2
T6o374K/mXpeQkwegTdDs28lH7Mr3ds98XEOcB7+d+T+fbD3Cb4nity7Bzj1
la455XMq+k6hb1OJe0E+vAx8FnpTrmdAI/RX8KEcemfONuDt2NzG+QDdH3I2
xe2LfKrG94Eo6sN9a5Gfg/yd5O9x6EPBZ4HPhT4E+lLuNxZ9NcR0CGcoZxjn
TmLQnO8efZL+fBSd07G9jnqfUuoYKBa1xGQEsdmD/a7oT6OvD7ztU+5V9WwC
+GTE9Brkj3G/u6OuJdEn49sf6Jue75mh2fFoyrFRjBYkHCPhFyH/KvK3gC8D
/hCfLsffB/HxcL5nwF/w15aa/jA2b2rrGapZKp467ra50LVbxrcc5HcQg04t
PBPHYb+L6gHaWr5tAa5I2V/1QCXwvIRrRTN3Bbmd0Na2ZFO+aaZqtg6iHiqp
1WXgXdA1l28rgCfj37QWrrFbgd+POH+XIv8x94vF3Kvq8fH481zKsj8jsxDe
8+2oUWBMhX+Afy9z7Smnq4ltLjYj0F/H55xy51S5vQ2B27NHcD510Jozs437
VT3TFVs/cOeafNdLz5R7Rr2jbz3Au3GG5LunBiA/Iel5vBZ8UtIzXLNcM78b
vfBA1PLaGf3Vmynr0g6crX6KuRdVc6q9XGRyOEeAj3K+R9/gfNuU7VlR7zbN
nDL0zY161mjndQCfH3Xv607V4MOLTRc+otgzQXTprE65J3RX+STfdGfh6plp
5PZUsWOvma/Zvznt3aYZollSRg3sbWmer4udI8H6ton8jOTbJ+BryO+kUsdc
sW+HnRLOgohnm3bWTvD5Eef3DPIXUA/nsFHZ0jt6Jba+LXTtq95U6x1Tjofu
30m1F/UsVr3GKu2DfFmKzFFiXZUyXfFLpzwjNCvk46hi17xqvwL6a9jbgPy7
wfIbgdslvB/0xilJuMZV61dSrwH978X9dlAPvQ/8RtzzUPt0P3cbnfRu0o66
MukdoF2gN4reKgXF5tUOLgQuy+5jyRxCvkN2v2mfHgU/Uez4KV7D8bdzdt9q
/34O/UDEstLRDtoLGc/KNPwbtE+Tfpt0g34D8DXQRxd45mr2akZqVmomazZr
J2g3qOdGV9mmbCtnx/FlTMax+BV949POoejyUbk+FrFv8nE39iMxz3a9MfTW
WJ7y20IzowjaGvSv5rwEb6NOkWeFZsZm8HVx7+8BfHsTW8dizpVyrtp8vci5
VA01Ybtnhd8nuvMJ8IsrfHf18BcRv4H0FurBSaBrb8T5UA6L4B1CjAYn3aPq
Vc10zfZq9H8J72HwwTme+doNzTiXae0df4nednHPXvEcgXdo0rtS+muBG4o8
6zXztQt2lRjXG0BvgWGljo9mpGbl2KTjqTuNU/6Srg3Fdwxw15jfgv/vD/QN
LPdbUDtHuyeSfV9qxs+gdxa3dywV00XAhyPWp5pLVngmaDbozXszvtSBX8uZ
oj3FKal076nH7tN7FZ767D66HXxj3LWnGtRbol/2vav9+SVGd6Ude+2kncDv
xB1bxbA5OxM1G/UG0FsglX1/aQbMQf/Jquy/Ad++AG7JfYfn+Y06qdw7XLtc
O2gGvT4y412umt+atg/yRfl7G/0buNOnOX4DLIx5x4sun/vi+6vka0me35R6
W3ZP+i2mN9zYMv+T6N9EPD2g7SvyrpC87q43qXKpnE7C1s3ZfaqY3aF91daz
TTP8fu63qY17Sz5dlvFM1WxVTh6E/lt2H+oN9FDUO1C7UDF4ilj9BwIi0vo=

            "]], 
           PolygonBox[{{5033, 5032, 5821, 1334, 4001}, {3528, 3527, 5834, 
            1339, 5835}, {5971, 1438, 5970, 4673, 4674}, {4195, 4194, 5962, 
            968, 4672}, {3530, 304, 7742, 7744, 7745}, {7958, 7957, 7956, 412,
             3691}, {4193, 1434, 5958, 5201, 5202}, {5037, 1057, 5826, 4003, 
            4004}}]}]}, 
        {Hue[0.24964843717433932`], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtl2lw1VcZxo8E2iw3y7039ya5uWugQAALaMe2ogOppXywJBjGVtQ6Q1Cn
ihJSAzpOHS1+UbRSKqUjUFISUGpYKkXbOgKliwsdgbJM6eIMddxqHRwopUUB
/T0850PmPff83/Nu53mf96TS19+7bEwIofd9IVQhr8mHsPbaELqKIWyqhHBj
TQh/S4QwJxPCm+gsbgxhYimEj7K/le8jrSEgQqUcwksFvleHcBjZz5knrwnh
9bYQ8mNDaMcJpsMq9p9n/yL7u7Ocl9NUCEO1+KgLoY7f30HnKNuT8HkLe11x
/8v4WIF8HIevoP879j9CrKfq0cXHM+kQvoTOIDo/SobQU2edMr+zxFwitlpi
m0EgfyaG3hw2m4kTXwP4rB3js9XITeRZg1xJnC/U2a++50quiWrzKfxWUZOj
2BxtJ3503uP7OPJ6i3guE//38Lm91v6WNjgGxdLJ2VnE/puOEIqc/TDrbR3+
rf0Ke7+t2L78VDgzC79l5HvEtBRf95LjU42u7RV0/00+UznbTzx9aeexke+H
0J3N2X3B9c7UOrejZa9z5H6G3weJcTf+OqKvYWw2U6v12EznfUZ3qXtUXXti
/T+Ev/3sTeHcKDEFbA6VjQPh4TiyyLebsTmEzbup+QHU3s/e1phvud24ODzO
ud1EzufQOQ02pqE3DZ2z5LeKdQNxDJPXRc5MEvbA6qWMa34FORsbE1ln0Xuc
u5jB718giwT+E+ycwPZOfl/P/i7kpKLvaWLRd6V1Z7D8flyvIeZj2BtoCuEk
5zcoZuyV8l4PVtwz6p1DfH8E/QeIYQt3Xoh+88iBgnM5Ry53kftnqOHnkF8p
+O50h5fIazI+JxTdV+qvbdzRKynjYRH2L1KHPur5beRM8PAANXuB2mfifb2E
zvZYS/VSFp351DeDnB7XT6C/POK/u8W9ph4UFmfwfSbnF3F+HrU+Qy5V1KoR
++v4fhj7C9Dtjhg4W+c+yaG/XLZZTyHWPeBwPGdvJq8Xs17/vt49fZC/Evrz
kc/GdSf23+D8AvRP1VpH8aj3hGfKeTUu+dKebMnm3rTxodreSC3PxF64nvUR
7Myu9rdnI59c9VWyjnTFZeK0NxPGvfD/D9Ztsd9bS+YYYUu4EsavsD8ZO+eo
57/Y+xnY2Fz2/say8S2cv4Wd1/hd4szryD3sr0Knn3vfyx10k28LNl4klweJ
pzrv/JSn6nmk7JoOojMXDPyBvb9i8zjcewP7x5DrImc+qXuMOgtZP5c1fsTT
Xfg7zTqJnx0dvqP9iqHROT2Ydk+MRA4U9nNjjf9NEc93tThuxX9d0v0q7hY/
3ye8j3OffLbFuavXl0V++BYxJliXsduA/Dh1WICd25H31dhmqso9Jhvrms1t
yl2cMzPvWGYkzHf69jSxr6i2jvB2d4t54xFq1lt2D6xsMr9prRopT+X7BGcz
xDGe8y3IgQavs6yXVJzXQwnzsjBYoi87E67nLmwMoj8R/RL6F9rMn+8iJ5fM
t/34LRasU0Ze4fwa7PwPeWu8I93V/dSxS/NB9xxzF99swc43sLMI/9UFz466
gjlUXPr3hOfSYJxNi6JUj8hP2xjXRPNSersr1pUv3e9OuPKP6h1kMmks30r9
Tjb5PjcQ22p8bquyLc0kcbU4eyThO2lFnswaJ1uoybiU9XcnzFPiq6f4/k6T
sdzd4V5UTx6Ic1f8Ix66AzyujD01iq0Rfg+jP5y2/9Vt5hH1+y/Zuy6+QyYg
95DDUfaHqc9e8nwV+zPrjdn10ZfOy84A8t6E5+HSgr8rJunozSJuFJ8urBg3
K9D5PPEfYr2MOJfEdS/rtdh/uNb9P9Lg+Xk+51kozP8z4W9zqv1toNW2n0+a
28Rx4iLNU71p9FZR3yt+1UtYF+YPku/0hOfC9Ly5SBjW/PtYxLxm5twW1/Mv
CfebYlhO/IMFx/A15LIG92A960/k/Da53O56H68zvjfH3IaaHWdX5GHdn+K6
QA3eaXN9VKfx5JPGzsZW56YcNZe6c+bz/2K/KuWYxTfq9Xl17vdT7P+J2tzW
aD+3RF/Tin5vHKh3b8mX+vfavHnyq3qDdTh39f0nO4ydZHz7zY88PyfaFKb1
ppQN8eUPWx3z/cihBmPgHmqyo8m81sb+vKTfdWtbXRvV6DVxTT7eRcI8Kv4R
H73LvW8mtwslzzDlPhXd/2D/GXLcn/G7UzX/IPtbG/2e2Zl2PsqrJm9sCWOL
iWVL1HkMnRty9v9d7C9H/yH0U+jPS/mdd1vKc0b4EDY+Hee7cLEhcuWlgt9E
4vmr78Cs30v7sX+s4LuY2+j53hNrqBmvWa/+vxB7+aZ2c4TqeoK9NUnzi97g
32zz3X6AeLPE9zDn7qm43qqPalouOxfldKzeOi15v4mED82EN5QX8eQa/cbS
W6uSNyaEjcsFz1312DC5LsyZ86aCnSP1rk8yb25UX4kfz2P/7YiPp7OO8zQ2
9tWbxx5Nuy+7Y+7iY9VWfNGUt03Vvjv2r2oivGgW6711IO16vlzvvlX/nsha
f0G0uSNrnl6cdjw98f+Unqijev8YzGWwOSFp/C+sMYdsz5p7xcHChLAhHImH
1OOqhThes1w8rxmrXta+ZqHm4Hzw012yzZ+z91ickepp3ZPuolV91uy8xZfj
i8azelr3oXt5mdhmxf8N+9j7QrPfAXeCt0J88+dL7vW+ON81H35QbS5Wvufj
XcxJGfPi15/G2acZKLuyr/9B1YfCzmicpaujnfYYz7aSbel+9daZUrSvTuRz
GfegelH/M6g/dpLXjjgHR5FL0q6taqxZopmSbzQ3qS9eTbk3tB6Lztj4/3JV
fLOdjf8rvh3z0p3qHS+u2IWvX6Ucg2K5o8Mz784O40+1Ud98vcE1/GKz31OH
IgYb4tu7Xvjn/K/R6cv4Padc14uLMq6D6rGvw5yk/xH/D9JRB4k=
            "]], PolygonBox[CompressedData["
1:eJwtlmds1VUYxg9toaXccm/XbW/vvf2XEqBl40IBBVwkKioYQSOo4IwgQyn6
wSjgF/fAFdmUqYwKEgETChrASBQqe2iixoUYEomLCOjvyXM/nOQ957x7d5k4
dfSUvBDCfk4BZ0MyhP7tQ+jI4wPlIRyrCyFbHMK7hSHUZkLokw1hG3hDO4bQ
EHHiIRyEsI2zsTKEOnDmCRea49DOrQ6hskMIneG3FNwNlcYVzTbgfPBfB78G
/J6xEMZXhDCO81AihIc5Kej3ok+n/BAOcd+IfgO494fnF/ztrA/h907Q8/8n
/zNT1r0Sfm3I34QNXQvM/zD3KB3CIOQNg6ZnTQgrkNkFew5w/wheYzljgBvg
dztwotTwTOxdhL0n4P9a7r6Q+7py23YCfS6DX69a+LYL4UN4rIX+27IQzsD/
SfCXRPaJfNMdnbZDO5K31dhzGh7vof810AyH9lPO1cBfS2fwe8CjAV9NxGcf
5/wn3++AR48C45wA92fsuQJZgzgRvI+UWNZQZBzAd31jlq8YRfB7BftmYE8T
5xHo18UsK4k++ei+CXlfQr9HNgE/zf870L/O2yLiVEw+REUhXIq8B9H/D3zQ
Au4w3mbw9wP4m+G3B37D4Pcv/v+ug2WcTTsHZItsmgDcG/wM/N9CvwT6ja/C
3/IV+OOAt3Amoesl8DhA/A9iUyN/NeAcAm7GZ8s6OaaN8JqFDyai2zBoLka3
/dWmVU6tRd//0OHVQsfsNv4X4IMLHR2za5BVjg5vF1on6ba0s/VZAf09/N/K
uaXKOavc/QzBs6HPh99u4AH4/3ixc1a5ezDhXFaMFWvVmPIVMeE+4KaEeUvG
ggrL0F3+bkb2YvQLxc5J5eblaee+ZGxC3tJy+2I4NJvjphHtreh0I77YVer8
HYkP+pHLT5Xan8rB0fC+E3lLgWdD8wS0R3hLw/tNfBBHyakJ1/4eaEYQzync
r+J+Jacb/Gtirr1l/C8HLgBnRb71OYz959H3e2Q3YMY54H3kyIQi++tYmWtU
taqe0AF5vWKWP5d7IffKlHXfzJnKXyizLPWsD5KWqXtf7uu4t8Qs/wVkNFCb
jyFvKPDb8ByNvzIZ9zb1uD7gfhh37qtm2qQv+JkCx2gBf60lzpUU92Z83cD9
GLRD4FGfdg+T/uo5G1Wbkf0jfz5APG8g5iOI/RzeNvK3JBev59Hpo7h1kC7v
wC+JbteX2deKiWJzgRo5Bf436HCUvx/B/zzf9VcOvxWRa1X9ZiXwX5xF+sNf
L1W7p6i3jOSMAp6QcG3ezH81vr2Ocy/wSXgMRtaGyPlchoyt+OMD9G3h7ALe
zVlY51pRzSyqcw+QLtLp2jL3VPVW9cc6/nvgr6PF7sG1afdQ9VL13DHgXpxx
fqwG5wni8zf6fMK9DRmzsLUqZV2l8/3IurbKtSD5qt23wFlc7Pr+mL/Wevfi
NPjb6s1TvNUzBiBreWf3q9ugvzkyjWh3ImOO8jdpX8vn7YHr0HlwoW2QLc3E
9Lc88xAvzRTNFulwH7K2xi1bOdSb/JuUm5+94DEZuCTj2lKOK9d/5bTyv5f7
SujfT1g3+eAvbC/NuDeqHx3F3mdy/U05pdw6XmZ9VVOqrSOlzgf18LXEc2rW
ssV/Ffwb0enFIteIavWmyL1CNp1BXmu5a0EzQ7NjfrVzSf10RKlrSrWlHnoh
7RxWLj/H6cHf9JRrRTJ6cj+Qq3fpuB/4HKepyDWl2lJNqjbV/xbi26KMa1/+
US9aH3PvWMW9Cdz5yCvKc823EJ8JmsfBbxOB78Ynd3VyDqs3Pxs5FzWz5wD3
yngeid9M/tcn3TuG8/ayemOdYc3IV7mfz9Xfac4IZFdlXKuqWe1Kj2c9+zQj
NSvbsu5tsvmrrHWWLMnsWmuZusumnvCagb+mdbBP5sH/TXywP885Mxd4bJV7
id6mkRtJeHYt8ryfzL2li2e5diLtRhH/3fkfwv+jCR/BgzldsL9vLh/EX7td
91rHTjU4ilxeDb99mn3g9I6cM8od5eiUrHce+VMzdw3+PhXzrBaNaLtGlicd
arPeQbSLaGc5WuKZoNmgHritxDNLd+Vje82XCte6dohHgL9OufdrhmkXy0s6
ForJOWLTlPUupXpcRiKkkX858uuQH8t6h1O/Ef10crlfxr6Xvf0z7onqjd/y
Nhz4J+wZ2NE8xEs7hHJfPfXvyDuZdhnFszHjmpV/5NNG/ufn9gnN7DXkTys6
7mjnfWd7pXc0xU4xrES/97H/vbh7rHptc9y5qh36DfQ9m3Jv0sz+B/iiGvdm
9QDtOmdqHCvNuMWdPZM0m9SzGvHvP5H1F/7ZyDND/Vo7XBHyq2PeRZSD+9B9
TW7/086u3X1Swr6QT1KRc076a+fMct9c5V4t/bSrlWTte9GIVjuwZpN60nfE
92TMu4NmpGZlt1LPRtXsePy/Jen6Uf1qFt1Zb3rNnDuAB2Ztr/Lxsqx7onqj
drZKDFlc4f1HO5R2q19izn3lpHLzwQrXk+Rrl8nEbatsXoe907LmLRnTgf8H
IvG7xg==
            "]], PolygonBox[CompressedData["
1:eJwtkc0ug0EYhU/a+mnoV/39Pk3ra7XpLUgJFjQqoYSdldiQSCoSt2Gh8RPu
gIUNYsFOSGhCCBs2LFiQuAbPZCxOZubMOed9553C0tpcIyApA9rAF5tPkPel
obDUzzrJuQYeI9Juh5TMSsG09BuSAqyVlDQICvAH3L+gm0I/DTy4PbiniM0w
WTd4rsFxAg81r9jnc1K5U9pwpG80P8CFK8KtO7Yn01vdlc7xLCSlGfazoAud
j24V3SuaN+DA5eEacO+cP0CcXnbo5YFexjiPg5UeaRnMk3MblKpxKYyuia6F
bgTN6L/WeO7htrlz0JzEeGO7lO6VJvDXXNu36b/E3IaZX9m3czDzeMa7jzeX
tZkm+w5uCy4Ed8kcLsCmJyXILcZspsn2qFGHO4UrgRT7pmf1xmfeZ96ZpV6F
un2+nYOZh8d+AC7DesbMi/xbC89hVDqK2r8zfxjulhbJrVLrD6w8QzM=
            "]]}]}, 
        {Hue[0.27091396794242295`], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtl3twFNQVxq8hCQlZ8trNJtnNPhLeKNKZtuNIfbS2IPKqMB0hKFAeCWhb
MBQ6asfR1tFqx9JW2ukIBEIatPIWBBVoal+Ita0C4j9YK50KQZwyWgcfaOnv
m+/+sXPunj33vO453znbumjFrOUlIYTJl4UwCHq8KYS/lYXwXGMIp4eEMLcq
hC/wQ3l5CJMqQ3iI86F0CJ+HDq8LoVAMYTf84dApbSHcAP++AudMCG9x56Ns
CJuSITSXhrARmswji52nEiE8WRNCLcZ/g815bbYzAp1nsHtble338v1++N3I
jMDuRfSMgpaghyvhCfQM4TyM85OcF8D8IvIjuXekynr0fRH8+ZwXQscXHMtd
tSE0ldi3McR/aGgIo6G/Rv8z3H+Ee5PJw+KGEA4i004svcSQ5dyP7I3INBHj
enz7KnqvR/9r6PztUOt7HT0XmkM4j42t8G+vD+Edzls4d6d8ntVK7NKJ/33I
L8+FcG0FscDvrvZ5Cv4m+TyHzNsJ65X+UvQNRkcF/rTyfXXKMquQeRWZa3nH
veR4Nn7m8bMPP7fBuxTfUXGvqrCu8hLHJT9+Sd6vgz+g3JDbEfC2oXNj0Xe7
oV8iJ3uQn0h8m/BzBzrez/iO7uq7cqcc7sX+BOLagO2p8PqK5l8Nby0+XQW/
Fz+vRNct+Pk56LjI7yeO0pYQ/gH/evTfTu7+io27ifVWdPUiMxf6bXRdg91v
QRfxOYjP9+DzMs6HOH+f8xyCewW/boEui3rmoacP/9cSS6/OBefobn7/eqX5
r3D/U+6sGRzCZ9DZVZYZQww7yMPL6GzB/56Yh934Mw27z3PvewnnSLmagOwb
xDAKPTfz+xw+B5C5C5ltdX6T9eTmAPXzE2Q+wVaR/I9EZjsy/+LuaPi3ci9X
Y7sXqJNmfusiP6uxM6rgeM/C+zn6Zpc717V17uFN6B9WcH4GkLmET+/i2wPY
+jhruxez1iv9z0MvIp/i7k95kwXEthP+ZmLNFhzjafT8gd93lLrWH+b+W8gc
4e798bcP8a0XP1JDXGvClfkRW4oRQ/bTQy+k/e56/6Ocr+N8LO3cKYeDOL+d
de8LA/7I96uROQxtL3e8iltv1Vjifu6POr/LvZUpv7vqaHvMeQ/2L08YQ4ZS
a531ruPNyBxvNf5sV+0U7X9TImJKheOcVmOquLP4/Q62MtDf4/Mp5J5FXzV6
38S3r/GGvdXOoXLZyVuOxdd3M8aquRH3JudcJ6qXrfh/BTq3QRfAHwP/DPyd
2Ovi/Fqr7x6J969MuGb6wZVh5OhB/FyNzAniOYueZnwb3+xc/ZkcjE04n4Pw
8YqE8TnJ+YaIacK2joiBc7E5LmFMaGlxv7bHnP+A394krnuhh+vMW0qM+2uM
sz1Jv8tDFX4bzRjNmmcbXTsvl7l+9jf6vA86p8391g6tyBnfhIXv438/dqdx
XsbvS6ucC/W56n9Nyn2oflxW7xo/X2r/Drc6xy9Cb6wx7zPiK0tbphS6nVy9
hy/HyFVX1vPuE2w1xJ4tcE7EHlcfnClzLLojzBaGDkR8F86vzBmP1HcdnNfV
uA9WCRsajEuj4R3Nua5ehf6deltOjCuRearJdf4nfBsR37Qt7xqVnXXEm4+4
p/7eJZ3EMg3fB6qd39HwNiMzg7sf4tdevh+F/0yDMUhxzeP3cWWeKZotqivN
Y9W75oryPynn+CV/JmGMUx5m5Vxn8m0nvEVJ61kI/U7E5w340pXzjLgTOgKs
G+DuC/hQiezlZZ5lmoWaRb3oSVFn/yQPN2U8m9XTB7n35Yx76nzW/SF8UU7v
wIc34F/F7zNjDauWZ2Z8d2Tefai79eiemLH+D9BzLmsc0E6xPuk6/RH5n5Dx
DDqb9czUu2huas9Qbk4Qy9a4z+xLelZJvhL9uRbvQtPh7Sl4R9KuVJG3jHTX
5e2PYhpZMCac47y56F1FO0u+wbNoLTk5iY7XkU9ApxaMJ8KVtoLx4TR3H+f7
o+R0LbVxDP8W4/dx6HvZ2OPYnInux0p9/xr0/xt+K7kt5O2z9rimvPOjPElW
9Sz5m2LemojvxdjvW4r2T34OR99fcsbt/+BLvuD5dSpjXJC87glXTpS6B9TH
nVXGXOVd+f9V0nNY2CC96nv5LR9UX+NjzbzU4FraB+1q8rzbiM12bDyN/FRy
fiFr7NJeMzzOnXzRcpLXnFRulVf18kutxg7Nyd1p2wngyc34343dGY32T37u
qzH2CU8mc55Y71mjXWNwi+tKc0bvIJ2aGZorilV7rnDxwYiNB1rdv+rjXWnH
uL7GM1I+b0HPV2Jtq8b/G/Hwg2bvcfeWu3+W1HrvahSGpN1fj6NnV6Pfsidl
3FHuF2GrI+LoCj6/a/C79ENH5Y3hwnLtcNI5HdqRdN8+nXbelX/19MPNlt+Q
9Mw5GfMpLBG+qWemZL1DTcr63YXj6o3p8b9DKzmbUfDba0frjVin+bww7vMr
lY+k+079pxxob1OdKDbFuDnlPV07jHB8Xc51XhzqPV75+jTneaC5ML/NPsm3
+jr71RF9uxMfeohndqOxSTlOQwstnrmavT9L+qzd7WTc96pyntnqzSU5z3v1
+B0575raJ8vI2SBi69NeqX2kzv7q/9burP1fQ13/kJwsIcYHoI+l3OO/gHak
PPu0Awr7hIGPct5Uaf/1pvrPINwag2+1LcYBzfzF8R31niXRh8vqvfPJrux/
HHV9BN2T9M6g3WFj/H/3SLPtSEa50mxRDWuPTLe477Q7fCNnHNA+e7zWszPd
5D7ojDvhqbjrViP744LfV/8XO+Osl/4n4N+jXoDeFzFHGHk65rkxZyzTW+vN
5Yvk9a76f6U5vSJnn5fFuj8X36WY864jbNL/v9vavFt9Ezo2b/zvanafLY+9
pvtLI3ZlCn53vf+lOs+m/0H/D4pdEN4=
            "]], PolygonBox[CompressedData["
1:eJwtl3ls1GUax196t047nWHazjAznU4tR/HOrjF4ZjfxiBIVY6SoiFZQhAhM
xUSNxtuoccl6K1B70CIIRaygIoo3UVERAf3DczergLtZ4hEP1HU/X7+/P97k
eX7P+9zP+zzPr9i98JwFZSGEzzkVnO6mELaPCWE3yEvAO/MhXFoTwhd8ew94
VXMIkytDqIV+6dgQboiF8GBdCCdwZwH0LU3m3cw50BDC9dAfgH4P+H2pEKZm
kQ/cWR7C6cCnF8y7FyMGG0N4OB7CYvAMd/qQf4A7f6sO4Ta+jUKbh47J4O8i
c7gYwsb2EN48KISjkTcLeG5LCGuwbzrfusA7WkO4A94l8PyKrGehvwt9VxV2
YdtMbHoH3b18OxvaI3H7N4i83xMhPAp+SOTvbOyZVrQ/xyPzSmwZhH4M9Nm1
IdxSsM/y/SPOa8SiNhfCp+haAc+V8HYg80/l5rk/HcJW4jkFuBEb1iP/v/CP
wvsLZzy0GVnLU066gLdwZwJ5OgGe96EPYsOZNaaPoq+Dbwe4/y/uHA++Fx83
A7+D/kH0f4DOb8ocg53A2bjzsYPzNPc747ZdOueA/8b5DNn7wSuRvZEYbYN3
BHxvg3Oi3AzhU1nSPov/H+DPgO9B//Po34b+PvRfgL2Tqo33g6+DfnuNc6Rc
lTLUEfG6gXM3cLHV8lUDP+P/xCbrfhX6TfD2IO9r/BnBxj7smQ3eWW1/VyC/
otm2/4dzctxHsGr6A+7+WHT8tsGfh7Yq7VwoJ6vTrnnVfjd3dgBv4M6Jlfa3
HP/OJx6Dla7vR9H/ODYdHJzv+ch+P2/ePeBd9eQU+/eXOYbPwNsdd66V8+Og
LaRmL6N2/4r8UeppCfX5AvL6ud+l2safQ4GrkDGLWtgXM13vYQh9fW3QiM0d
8K+h1lqI4XLu3wW+AfypZtdyEZ/WAzfj455K18QI7++qrGtTNVoCnooNW5C3
jvtnAH+fMb4dnTfGzCPeGPc3Y19b9D5Vc63ALVE+VANNwDcW7Fsf7+Vn4B8z
zqVi8gPwMN+uq3VNqjZXIX9arXV+Bz1BDD+G/yRi9BdidSTfzoN2L9+24t9w
m2H5OwS8NOXeovroJz/3IP+TKuf4buCN6Ggpcw2Op9aWE9M0+CTuv4Cul/WG
guv5FeAv8fm54J5xMvkfKLiXyeaVwA1RfW/iTgz49YTtU05KxHp6i3OpnM3B
tn82unco5i+Tj+F650Y9ZzX40wn7Mh3+I/D1KM6MKsuU7DcSpumbaE80Opb3
E78zsecS/KkBPgx5a5H3etRvWrk/Hd4BbLivwjFWrA/C5onV9rEGeDk2/xn9
FxHvbuL9QMq1rpovcX98wnTVrGp3yjjHFzCMovsnaugL8PHgPwAPpa37KfTN
gLeTmHeO8ZufDDwm6belN7YDWye0OhfKyUTgDU3uVXqvI8DDjX7/8uFJYrsp
6u+q6Z3Qfsu690vGNGwbJn/ra62/SH0Mphyrs8Af534P9BJnEd9LokX+quer
9/e0Oxbncy4Evhd/Utie5pyqXGU8u2TvnRnrkC75vIK7uxpdu6rhpUkfwfuw
dze0jia/LeVQvWIh+hdw5nHmc5IJ15tm3BD5nRT1Q82zTvw7o9365GMB3b3o
vKncOVIur8amEnerkX/xWPt8VvS+voU2Je96U884FvhXTrbC/WZp3DziVY2q
VncRk1K1dewE/p54f46sDnz4Bri/zb3oFHQMAP8v4dmqHvYE+b2m0TS9j0XY
91PBvWEhMtfAv5/zWZV76r+BV8TMrxmtXWRf1vNV9fYlcE80P7RDaJfYXO/c
640vw/aRmOtLM0WzZVnauVO/Oxjbbs16Pmjm3Qw8rcW7gd57T8ozSbNJMRlE
3kUo/qrO8Z0J/BDyP6xyTtWrtGMoN8qRZtfijGOZgmc78Tgtbl3q/2/nnWPl
WjWoWqzMONeK4dqEcyx5qnHVejpmWYqJYqMdQ7NH8apm97gKfGWd32ABf5u5
g1t/xOg99JegD9c5Z2noi8CH6py/RvgXRLhykID+ZtHzUDF6q+gZJ33KQQ30
gQbPCr3JXvzoj/qp3viL9Z7Jms2aD915zyzNLs2MCeT+8nrnXjW1LusaEK43
prc2NmfbZG8q55mj2fM18chCXx0zXTbL9vKca0P2VQCHpGv3CO4/Sf0sixtW
j+zG1p4oHupXzdxfGTO/eto8aPU5x1bxaMh5B5X96udz896x5J9mXnvBO452
Hc2/rrx3IOGaEa3Ql4O/XeeeO07zaKxnk/Spl+ZytkX5ywP3Rvc1X6bmvQOo
npTTmcCLo3xrRyxw/9mkZ5d2Mu12S6J+pZgq1gcKrn19+wV4ETJPrPFOr93+
vKx3S+1IA9A2Fd17NZ+fB/52nGereErQc3HTdV+7aTLnWCkfqq0Z7d7N1cM0
O7+K2Rf5pFiUN/st6E2ciqyZecdO8ZwFvDZm3+SjavucvPkVz3OBiznHSnTF
Qju79h31C+326jFV0fw8nLd1St6zTvE/DXh7s3dr6fg7vGdH81D2KfYXt7v3
659D/x7pnGtRNaPauTb6n5DMq1Pe+bT7qUdshZ5Ju9drZ1pL75uT91tQ/V8G
vDvvfxm9sanYOzfp+Oo9XZH0DNEs0Qx/DVvn5/0vovmkf61lUb/9nR76GPCa
mOtH9umt97aZpp6if6X/A4jM+GY=
            "]], 
           PolygonBox[{{5842, 1342, 4020, 5010, 5011}, {5965, 1436, 4196, 
            5230, 5231}, {6735, 6734, 7163, 1933, 3514}, {6709, 6708, 8067, 
            2404, 4322}, {5011, 5010, 4019, 1341, 5839}, {5671, 1275, 3938, 
            5440, 5441}, {5441, 5440, 3937, 1274, 5668}, {5264, 5263, 4209, 
            1442, 5979}, {7714, 2181, 7715, 6734, 6735}, {6896, 6895, 7535, 
            2109, 3741}, {8222, 2480, 8224, 6708, 6709}, {5233, 5232, 5966, 
            1437, 5969}, {3740, 2108, 7532, 6895, 6896}, {5976, 1440, 4208, 
            5263, 5264}}]}]}, 
        {Hue[0.2921794987105069], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtlltslFUQxw+UXQS6bbd769fNdncr9wcDDz5Q9YEYI0IBMRHKLSVQKJdy
aRujJkYCqKA0CBJLC63SlnJpUSKlYAEjJgQpUZBr4otEEgwPkiCgKF7wN/y/
hy8z35yZOTNzZv7nZBeufmXVQOfcr3w5fFujzm0e5FxFwrmWlHMewnsFzh3l
/yDyETHnhiI7PsC56+g/y38P8uFx5+LQjU84N4q1gYXOxXB8OB97z7nb8Pvx
My7t3Cbsfypy7iQ6P6A7Fp11ec69i/1M9mkmhg/hd0G7+b+EfjW6N9HpQp5m
z7lJ514e7NzzIed250l/J/or+N6BXw0dUaJ4ei2GIc7d55uIr7eCzhWhU0z8
uyLOJeBPhBSfxdmG7fKsc+1Dndub61x5qXMvDXNuKrQDH7/zvYCfPuK4Svzj
8R+DP4+/j9DfTjwT2PdFck1nnJuE7RRsL1KjkegPIJf6qPItQ2enH0MzdA05
3fXj9IKK23jb856/79/Y7IZ/CA3iO8A3DbuGjHLsCDvXSN262WsnsbSltD6T
mp2DryS2ScTc7/NnoZ+ydw6570DekVX8VcjHBLDP0drJkOrWgu4+zq8ceT8+
55FbDTHUQTuxfQbb5dg2RtQTTRHVxeqTpE7F9EMXfpcQ4z5sqtC/hn6a81oP
X5/Vmul0kFMR8rXIa5En2fcC8hOsj+EAhxDD6Jj60XjryfnsF2TfSmgnMQ+G
XwC/lS8Kf4FzSPg+kyXya3x3rvrY+nliTL1rPfyQHPfGVYt90OnF6vFSbA/E
NCN3CxS3xX8wV37NZ6xENbX61ZF3P/ZT0D+Dz0pyn0/deqFP4zOCvIR82/E1
jXOczPnehK+G35xW3Bb/dvJYMUy2G1j7IC2dBmgR9blFnAno5QLVpC+hXrQz
XZRSL/cM0X6zwornNL7XYPMjcb6BXRMxB+Cr2KuLtQz5/ofumHzN7DF6eGxG
thXIt/m40cReqXz15QPqUeHjw3PQE/xfZ6YmcCZ38iS39cv4+Dag/ni9QDF4
nva2GJrxdyghnU7Wj/t++rI659EBxbc4ptgsxrF+nPUxzafN6TH42WH17R5y
7YzLtjFfNbXaXooLOwxDprLnDcM7bHuQH8Amw0zuhy4s1Xy2FAkTVvhn8Q36
17A9Bf3eP69t+D49TDhgdd9YpNr/TC6TwprvtiKdp/mxGbe5tfltJ4bWuLCq
LVd9aXUbhexUXH5u4KfZ15+D/q08zUNvQnhtuD0cejMg3tZq/P6xvQyDDIsM
g9t93FhUqLmPDFXvtrLHL9CmqPrVbBdAZ2Ql3468wce3o5xvBz7fJNd26K64
5qUP+R5fXhjWfNr5dbPuMqrjI9bPZ7RvPFf16PBxb5mPyUuhi5I6U8PgT4j7
IHwXsVcEhRvWQ1Zvq7uddxs+B2C72/A4KN7uIZsPwxPDjcv4vY38Slb3n/Xz
lqiwxnQ+owZH4M/B9yR0Fxlvd0Y/NrewPZvVedi52EwvT6iXaqK6Rw0rDDMO
h7V/VUL4aDjZQh3W5knf7Az7LJfFtqfvf15IM2H9Dvt4ti0Hw0K7N6wnrZ+O
h1RzwyrDaKvBCPzNQV7JXbAeWYmPtynoH/w3IP8zqZ42P63QHXnC82XgRm9I
Og/QWZqS/DHew4+H31yqObf+jKJzJK5YrMfr/PtuBvF+FdTM27zvIaYc8uqE
HogLqw2zDR8NWwxj/g2rF/+BfhlSj1mvHfX57+CXFcrnUui6pHLcAD0TVk+M
A09q+a9AXg+9U6yeaSG/8nzdQVfJo5qvDL4R+RKfXwwd5KlvxqfVB9YPcepz
JSVbu8csN8uxlly/Dqo/rDfm+r1kb6tWv1cf7x+Wz4Cn8xw0UGdaQXzTiXM2
tAzBZPgp8K8mdY/Pgl4s0DxHDYtSwna7t2eElGNdUrUM+D7v+b1hc/QoLLlh
/OSk/Jcn9cayt9ZfzN0h/uuQfwGdHRH+GA7Zu8361vrX3gI1Qa2tTAkHDA+e
8jR/dp9UFUpu+HHH09n/Bi3ze2YCdJOnN9n70Pc83blb2HOVJ/8roQliWg1f
76nPzPZtark2V7W+72l27f1keG33p+Vitf44Ip/muzqk9S3ENjIjPH4yo/eB
1es1dD5PSsd0/wcnwH6W
            "]], PolygonBox[CompressedData["
1:eJwtllls1FUUxi9daZkWpjOd6VBnq7SUBxEegRcxAUFWUaRQCoggWwEpIpsJ
RjRgICgiSGmLLRSQtmwpBVmUqASUKAoFE40GgwFBRdmJRMXf5/k/nOTce889
+/3OTU6eO2pOinPuBJQGjY06VwYt8jm3GLqa69zhDs5lpzrXI9+5qohzqVwI
ZDt3OuHcm6xfyXCuK3c3B5xbF3TuMufN3Knmbj0yHZAdhEyL33RKdwU2JkAn
Oc/lPBVq47yG+2/hyOfpzm3v4tyjcedWppqOBmS3InM7y7lb0CrW72EzhPxS
9K/Al3NJ564hm4393YXO3WOd0cm54Zncx95Gz78Wzjfj36fE9C33v2F9NM+5
YcgMhV7Gx4VQBJ3fId+EP13h+3DWu6P524j9JmR2QnOwMxfqTyIeg/7E9nVo
AJSO/QvIH+H8MutLUEoMHdBo9D0DXeTOz1BVkXOVyA8g5ufgmwqcSxDbENZf
hPAZHXVJ81G+ziRHM6DFxLUEGlNoscqmbCsGxTIK2aeh++zlE0934j2c41wQ
/ZfSrcaq9QfI7oBmYaMSWgD/EjSQu09AZ/EhSL5KkD8DPxCfB0C30XsH6gff
F7oK/yvUgE/XsHea/qiHb0BnfdJ6TL02GBoE/cCdH6FJ8BOhX+CvQLXUtyDN
emwl+d9C/W9S+xeJsQX9J/3WP6rPtDCxYmNB0HyW79sSVivJSHZtwPxfTg33
dXbu+TzrVfXEFPgG8tE/1XpsdcJ6UvdV83741QsfyjKsJ3rCb8TmqjTTsQG+
Efk73N0KOe6H0Pc1vmWhs506PevVZwRUBl+ab2fK/xXyPx4b5VHLkXL1FPzI
qNVcta/Ntd6Vv7PZ383eWfyLoKOW9d2k1V49H+1sOVVupUO67mFzNbZfJZ49
nDdTwwz8T6CzCX4BMWWypjVchPzNZz2XeNOwN57c7acnj6O7lfhKEvbm9faF
Ce/D9yTeR6CP0XUMOpRjvaaeW8/5DvZ6pJt8OesOedZLOk+BD/kMWxqIZwv8
SOJZl205XktdR7B+h3Vf/J9GPNXEkJ5iPu9E9xKfnffhfDLnebwxf8zepN7m
Up/p68f59KhhmrDtCj4V4PeEgOWjO+v16o+o6ZJO2X4BH88iP5z4t1DPf/2W
O/nwAH5q1HyTvHwpIv4ktIn9Guh4yN6y3vRO7B1KGjaoZqpdndfvJdh/t7PV
SLVaBoVjhpkV3hvRWwmyF4gZBgmLJlGfik6GIeOLDIOERb9Bv0OzqWdlhtmQ
rQ3oL023mBV7FToOcf4661lBy4FyoXr84zef5FuY803Ibw3ZWvqOEmdjyOSl
r4LzxhzLj2xs42xRF3s7wnRhu96g3uJrUIw4EjFb642+zf02zld0NIwX1u8j
hqpMw/eL1K4oZv0lmWL4Ep/NAslvCBgGXfUwV9irGaFz+V/DeYvPbMumbKvn
FKtiUCx/+22tnt0eMowT1t2AbhYa5gh7hAknkG2kpkNTrcZj/Ibpwna9ab3t
Os4jGYZhwrLCfMNGYeRD8DPpr3bufoTMdXxtDVmswrtd2NvkzcfPVBNyWYKO
5VlW84nUe0bUels9rrfzIG5YJJlW+G4Je7uDkI8nDEOlWzOzPWkykp2CjnPo
iiETSLU7uhvHxybst+NfKXF9GbL3q3p9BX8kx3KrnlBv3CaGYxkW3y34KuyV
Ya8efYPx/XzUbMmmYhHGCGvUM+odzXjNemGqsPVGxHKjnOXn24zUrFROJ8Ov
KbB8qUf2YuuniPXzG/g0n9w97MU/mPiHIl8dMH/VE+qdg+g8z/3v2TsFvyZg
2KQYP8Sfg3n2V9Cf4RPOa0PWa+rBGvjihNVfGCmsHFJkudbeWL/9afS3UY1V
622sT3rrGayz6MGOMZuhmqWd4LNjNpM1mzVDFbvu7KH3hhVZLKrRCmLvCl1w
NnMK4VuROZVuNbvE7NgbNvvqofpc6znVRjL7OXsybtimGVOXa38a/W2EocJS
/Qn0N5CP8vWm9xaEQcKiXV4/aYbuD9mfY5T3x9FfZ6r3Xv6fxwnDJGGTYlSs
ZX57O8rXDvxf57Nek/8xfG32GRYKEyPKS9jeguKpJjeVQcMu1Vy1L+FOS5r9
cc50sT/SYu+PoL/CvKD1huSFfU1hi10Y3wy/JmizR+9Js2Nc2Ga99srhD6C/
DSqmN0qgccQyMtN6ZCr7veP29xXe9YJ/PMdmv/4AowvtTzXQ+wPpL9QWtr+A
fD4AP93DA9VMtdObUz50rtiUA+VCM/2usJ6a/QEV612GDCOUH8Wj2TU/33yT
j+XId/PyI53K9f24vU290XmFlnPlXm94mc9mtma3Zv5Y+Aaf8Zopc8j3Xz6z
JZuqzZSwxS7MX4gv/wF+5LHX
            "]], PolygonBox[CompressedData["
1:eJwtkksopWEYx/+5DrnfZ3Qc35RjZcoKh5XJZQ4aY6EhpcYJcxamWFHIrdxq
lKLYTAhZoMRiFkxWzllaWMxGFmLhMsspC36v91v8et7zXP/Pcz7n24+WvihJ
PoiFimTpMlH67Uh72dI+RBdIUbCZJK0R+06s/J1UBvNeqSdBuk6TVj3SChTS
45y8XfJ8OVIRFMNBjPQvRbqn7g5C5Fa+kZbxRZjzl3gYewhH7myjoTFfCsRL
fvqOkFtKjZ/ahlxi8BF/M/F28rrID4IPXxH84X1B31PXb+Jt5H0mv5p4r2N3
Cjl2H7PXLdxAkBkVzFpkZjb7j/LOw9YQq4UZ+kzDGbW39IhgW9Ezxbz+LO7E
TUJpVqPR2gSTxEbpN4R/EGLfSvVxUgx2hF7DUJ8qdTIrzPxP6dIv7vvEnX/m
SQuQlW9vWcUuDju8hwtyg9Q0plpNRpvJNTX7vPvZdw/b4N4ygK2FOuNjlwD8
5z1P7JB+V2jLjOZ+/G8l9PgAa2gYRMuG12o3O9S5fTLSbWyd2Di/O+kz5u5j
9hJ9ntE74cbamTHnfjuz2C10b4OH+46zh7fAajLajP81joZCbrWDXeKGfvK6
PfZbMt/UCTOOYYAZX5nxhRlnHnvLCPaBmkfoSLb/V9ixmoy2F37ua0w=
            "]]}]}, 
        {Hue[0.3134450294785909], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJxFlmls1NUaxg9QUKTTZTpLp8O/Mx2luTcmRo0LrjESZZFFVPCKSEQ0XtzA
JRq5EYpREIrVqhQUBEqBUq4KWETcYjQxgEuMXqOJHzTgFhcUNa5X1N/jcxI/
/HPeOfO+z3nOu56WK+ZccMPAEEJ6QAiDWGc0hDCQja5afuRCqGJ/eiqEU/m+
Z2tbNoSxSQgnHB7CaNZqfn+O/oa6EP5zWAg7hoYwEaBXW0KYye8lxRCWg5mt
CuEZMGqHhHBwMEDgdrFfQGytDmEKWCeBeSHrg2DtB/OyNHjYjEC3DS7TUuYj
XhuQB4M5HYxL+KqQL43cS+gAGS4HaySYM1ifB2s/vF6G74RG32VCOYQ1NSF0
YLsyE8L5cP4Y+9noj+YeI+H6Pr/fgs9h2LZiO4X7/ITt2Zz/+DB4oDeM87qx
PZmzpmO7H8xeMHNZ60n/SuRH4RfAu55L34XOInRu49xJLb7vLGwXo9OAfCc6
KzLmtjkfwrUp+7cC5wVwmIH8RmIf6M66741Zn3Vd2b6QT3rxVb7ZmFuJ6Yqc
Y/EQ/+9FPpVYbMEfOyqO3QhsP4fbE+hk2P8561hN4vzF/K7DJxPQrWX/Df7q
5OAK8uH45238tLnWmO2lEMr1jvfSRvtOPvxHE3Bl+20uOJ8ljumlKfOQrTA2
Yz+GO47irpvYL4FzJnafwO0Z9PvxSRffc+ivZD2K/3+LuXdfjWMxDexLEsuK
j+zE4YNgHpJLugd+OB2c11kXlcxhd845p9zrh9saODRxxgB8+RWclsLtIOtY
7jgKnJuKzkXF42ZitwubBuQO9u5tsHwf65Pst2P7PfpbU8apBvO0WF/Kze+K
1vmBta7RvD/lTluLPut+9nbC+20wX2XdAIeF7Lfjn/EV++BI5D4wl4DzGXbD
0etDv5j1eTr3APtpvpOQs6yVlOUM8jrO2If+6cRiPLwPwaET+Zd6yw8gf1o0
/hdF17nq/V383cs3CZ/3qBayxtnO/8+1OKbnIFcVXFvz6pyXys+fFGt+f4m8
KuOc0t0Vr/Up1/UaYtJNLb+AfDHYVyeuHdXQJn7/iO5Z6IayfSLfqI9IpxPs
3phL/2L/6yOch+eityjWlGqrMtg1onsq56S/EbsnOGMc91rFmRfE3tUBn6di
jzqvyX1Q/bAeLmn8fAf6c1rMSdwexHYo+/PYv4791pzv8g3x7Ym26qm9edfX
L9TXGGwPIe9i/0n298JvO+vU2DPPJWc35px76osrwdoC5mp0/sv3imo8714i
WWeMYF03yP1ocYzdPtbzU6531f3kKL8I9o6880d5pN4mDorTgSaf1cWZn8A/
A+bIJvcJ1aRycRm+yqB7Nw67NeO+N4/1w6JrXz1gAfYbkcfn3aPVq1s5f36M
y52sC2Nv3Ea+vB7zv4K8jBgN56xuYnQ08k5iehnxvbni+KrfTOQbC84YcLLx
Dt8WnFMDYv88VO9eurzW/Vq9dBQcmpvNfzv7HzZ6LrShe03aPlDOqjeIg3JJ
etLvhO+zce7sYt2JTTvyfjC2Ndo/W1k7M547mj9zI+eB8J2Z9v5K8B+Js+Mh
cWP/LXBm6f/o85eKrlXV2k7ilcR6T4P/cMa5pJwSR9WFeOoc1YDmVw//vURM
14J3VcT/udrzXn3plJTzSbG+nP/XwPVEcm9yYjzhCPP3xOt47tpa9kzRbNmU
s69/Y38+c3MB39JoJ3txmFNwLKY2uP+qD+/hXrla110Heb6sYtszOKcu1ldt
s30kX3Vl3B/VJ9Wb9ybOH+XRuLRzbHbedav6Xccdl2veg9PJ2seZk4Y4TqpP
1elmdFYn5qAeoHrWuVuq3ePU6x5LnFvKscllx0Nx+QheBwvOE+WL8lsc5pPv
s8G5HdtB8N9dtj+uyjv/lId6i3XGt9CyjOeV5rL64WmJ9Z/ijsc0+k21r87z
Uj12IuvoyOc81jZ8NvAI22ys9bn3lOzLthiLWyI3+enNtH04DvxZefulWPBb
TX57WPnY/HfMVdvK+SXs31Bwb+lG9//1ln9lHRffjffU+H2jWlZNr4j9Sr1E
uasc/oi8O5D81X7C4Gr3OPW6jhrXkmrqFXT6Y+9SD1NdKW5Tyn5z6O1xN+s1
+GUt/Kdyj6aC41so+O2iukiD89gwv+eUh+8kXvs5c0js1VXNnlvy7cVFz131
n6ezzhvlzzest9XZV1dyVlvsafKrOInbRaw9JcdF8ZkZ36gPoPtI2W+Yvnr3
mPeGekaKh/j8UfK81N565LU5v/Gm6Y1BTIdz7r3sTS3bdiE4/8w6Z/Sm60s8
RzRPnkb+H/KmxD1FvUXv08ZG68tuB1jHg/m43js1rveJiX0q385l/2CN55fm
2LElv5uPK3meaX8P+q8lljW3JyTGUf9ojzO6p95n6Kx+cFblPINX55zfyk3V
h+aKaurf2HbnPMPW5zx3NX+TZr991bd7S36jaIbr/fIn8BS84g==
            "]], PolygonBox[CompressedData["
1:eJwtlllsFVQQhofSFrS3y6V3aXu57aVYTNAYNYoKamJMKCKLIqIIGhFw3yIq
EaOCMVWgiMhSFtlaaWlBUUDCEkN8MBENGtBo4oMK4kLUuMad6Pfnvw8nmTnn
zMw/6zlDbntg0v0lEbGXVcpqro44CnG8f8T+QRHL8xG/s986MGIldCvrAuil
p0c8koh4OBUxhzWyKWIUaxvyj3M+j1XeGDEoHXEY+e8wUgs9vjmipjxiAvrH
QbdnIgaXcYbNvZXs5yLGDIj4FZlR8LOzEYu4W4K9rkLEfdi6l/VFfcQx1smG
iG9Zy6siVrAW1kaksNXSL2I38vO424bujdi4uwb7Beu+ChsToJtZjw8wnunJ
iO34NxHsp7jTC/0wmOewpoFrOmsCexdy/gJ4xg2J6MHnP8KYt0LXg2ki/vVi
by72HkSmGj7Acw147sGfu7P2Qb7cSoz7ODsB5hnQnej4tMT4uqC7wLQAbIPR
0V5wzBV7+fQo8insjSvam4neSyrtn/AcAN9+sO9jnUdezmfdzp3F/Y2xAdnD
+HMLd98Ew3vQc4vxko2xyHcWHPv5FRFLmp0D8dIhXZMLprWnu5OzjrV0PEM+
WsA7r9z5XUJu/kq4Hk7i4x34Ox//Li63D/JlCnf6cdYEnk58yTc6l8ppI/R6
6mUo+kvRN5W7aeI7AvxjyUkG/1J1Ea9yNgBMR4h/W73tp9lbyf2KRtfnImS+
R7YEzC+fFvEK/u2EX15t/ZuQ/wds/bjfgPxo+ICelXWshXcn5xOI0TJ8vxid
M/Le05l8+gwsq4nn89g+iMx68DSljW0fPn1FfF4kHke528OddNoykm0F07nk
f0PGsZC/G6EXkYMnwbqFvfnIrwJvCbEp43xLxj2h3lBPqjdvAtNFA41RWB9L
mNbeVM7Wpdybyska6KW1zpV6cgm6F4NhJHQKzF+B/4Zif6rmr4eeU2/bqI1s
wjWj2tGMGIv+MxvsXy938vi3Net4KP9d6NtV6fzWwj+L7adzrsdS9m7irCdj
3xWDbujFRf81E0bl3YPqxRHYmwKfTFu3/KmGnpvwuXp2POe95OdfYnsGmF6r
c8+r97W3llrYmvDsUo2oVlZVuT+Pq16RXw3GU/C4HaugXwJTc5n3dNaHf2+X
2ccNyG5OuJZUU6rdzXXuZdXUmKR7QHglsw3Z1/H/GLJXIrMDegv3m8o9o+4h
HhvUx2WW38BZJzpb4AMdk7GfAXOaNZq4t7JuTFp+D/4Nx7+/k8Yjmc0ZY5Au
6dwNvxoMB8o8j5apfmodf+FXb6zLu9fUc83gOa/JtaqZVUpQNiUcG8XjL3Sv
qTUvfGuhB4MtV8QorD/k3IuKt96Oh3L2XfPy2kq/GarPQ9jfCbY/cq4V1cwb
mnXwi5F/EvlXkf8GfiH8Y/Bb4FfUuvc1AzSLhiT9/vyEvrOJ38RK25LND8hF
qtG6pPMX1WLeva2eUe+0EMPdpzkfh3J+c/T2tBKHMaxBda519XcN9J/IHOnv
/t8I/pmDzL8F36lZWWNae7M5G1pwPcrGsILfVL2tC7DxdJV9FL4nWDVg7UuY
1p6w35V37lSzHZoPKfPKaQf2fsz7Lec4foDOpD171KPq1dezjrX2jiO/K+Pa
UE0e5+6OOveOYqhY3px0banGujl7n/uXlnletxP76/LuTfWgenFc0rNUM3dO
s3OgXOiNLCQdo4PF/ukA+9dVjuVAZJqx342+D8NvdA/0ffWuLdX0/dBfpo1V
mNUr7+T9tmmmHIL+ud6+qaZ+qvdMPliM/yzin6v3fNebtgc8Z6FjeLX/APoL
LKt2baumOvD1YMb1Ix/OwZff0Pcrq5e7fYotPm5nXlVw5yPs59KuD8Vbs39X
1v5pbzf0NQX30ifEZwr0f02W1R8g4C9Dx1MVxRmI7r1p/1Um498s6nFYpf9u
+sPtSXsmKD4K0yToBUnr1hvzeZ1rWLWs/PXA/5v0rNWbcgp6eqVn8QzuvMus
nVbkFc82ZLuL/ul8V85/BP0VhLFds7rKb5XwanY/1+Te1Htygjg9X3xv1J96
q4/VOJaqr2fB83HeumVDsbw657+R/jgjwXIs53Nh+hy6PeVZrfpfje2xSfe2
amJTnd94vfXSJ+x3DjEWYboL+ssa83rz2sB6bcH2lBPlpn+j72rGfI2uLDo/
C/856qCnEvMbWZexLtffq9K1ojdiHbVyhWZCmf/U3aqn4n9VPXOY8/8B5pqG
NA==
            "]], PolygonBox[CompressedData["
1:eJwlkTssg2EUhl9U6EClVEUvWGsilFCSkig2UrfoIFiQEKtEhImiEhISJBJi
qIUYNG6DwS0Rg52hDJjEJYyeP//w5Jz/O995z3u+v6R/rH00VZIb0mExn5xk
gXiUJSWgoVAKwodLimZI+5wtZ0vVmVKfR3ql9gZdDuk8hXvUusl7HGa/oXOH
XgDde2K5TSqDBPUHCzXiE/2P0IZeJbpRNDZgHbad0gW9O8QD+nIx7PRKLnBD
gL5aeMffHP7izLNxPomO3Wt6N3aIoeXnrIMZz3y/QD2z6yCPXj+9duIac06Z
t+o05xs+bjiv4ewW/1fk1y6z39CJoFeF7hL3ZqGCvMVj7mPstYd+HD5zpD80
ggXSJd/JNOnMLvnYqRSai6QQDNCbZMcV7g8yJ4yvAeIxPScwhK9d3nmKWcPk
I2BhzwnmWr3mWxhvMkN9GjqpbzE3TIyg0wuNvNEv/3vcYe5i7OQr5l9Z8UKM
4aMVvU28fOHjG0JoNsEPd+fxdIjGP82qU9M=
            "]]}]}, 
        {Hue[0.3347105602466751], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtlmls1GUQxoeWG7Z7dHfZZV1oVwwm6Acx0RhPkAQFSisSwIoGUIxIQBQi
CCRALG2BFpBDDpO2QoAidwEhmPCBqJhYkEhIMKQBLInhg0eCyGEEf4/zfngz
s/Of83ln5t3yae+Pm11kZhc5xZz9ebOqnmYDomZDyswW9jA7nTPbDF+Jwptx
s2v9zVq7mK0uMXtyoNnLvcyegFZFzCaiPwf96+jsRmcdOks5Q/G5smD2TN75
56CT8dWGbQHft+Gb8b8ubTaY30eR/1xutgT5LOQXMvhGfhH5JOidoN/S12wx
NrGuZjWlZofIYRBxP0JWRy43epvNhTbyDRf2EPr1fEugvwpZXanbHsbuPnYD
OH3Qm5c0uwQwV7PQhFkJ8j04OJxzfzsLnst5zmzyaO5n1o7dbfzXojMFndfx
uTzwNdAf8fMrupXIzwb+DLQpBk+srimzioTHXYRsLPVfga8Gq2rqLXQ320cO
G0ocW2Fcis1O8k9At4HLBfIZD/0k7fU2q15qjKOzEnoU+ePdzI5Bf8HPcfwc
IvdjEcekEfmRiOuvQL+tn/tXHGEqbA9GHOv/MQefO3y7Dv8iPfMa/HH4iSmv
R3W1UEv3Yo/VQU77sH8Qfir+Ggues3L/J+53sD7qfaD7/TvuWAiTYXnHXfi3
gWdvCtxBrBhx3urnfZIkn+Hkdhc/q/DzNLFGoz8253cvTDbw/Sv8VoFnLus9
Ut/D/W4gbhE+X0WnIue2ldCrGD6F/pWM24lXPPXLvdAza0t8LurIZT/nO3De
Cx0Vek93sp1avkHeivzh0OdboDNw8B5nBD5/o87ZzMgf0HZqu0Q+Q6llOzaN
8J8TxwaYLUCnC/Tjgven+lQ+5Ev1/ID9FHTOCLeMz+8b1D066vJ25E3I+4Jt
E7JdxGrH/0n67lrOfXRCr5HzO+RZz4zPJdYs/I/BzypsE+BQgJ8DzrXoX0H/
cs75q9AWdHLojEInBt9J7QnoCWKdJ9bbOd8v2jPfQ+f3dP/C4XlwOUXchcQc
lvHcvsQuGXo+iixG/Qny3x8Nswo/i9ldUuryJciW9vLZeazY89Vv8bWhh7U/
ZkYcwx34bKXORejsgi7nTIevgUYy3sOd4N8Q89msT/p9694nJDye4i7Ad0fK
sZ2PrDb46cRuU9J3hXaG8hrJqSGf1fxeqTnle0vEe2t92udHc9Qbf8VZ1y+C
bgx7YB12VWW+i16Bfh2wPc39PgA+y8D0IPhsCf4blfNAv9MV0N2h3iR3VBZ3
bB6h1vLAH4D/ixzeRWf1QO8L9ZjmpaHU98ZZ8pxG/efQv8Wczcz6XFTy/V6w
UU9NzTtu2m2TEs4LS9Ws3JSj6lFdk/k+NficAt2Y9P5v4fuj1DORuk7grzHq
876GWJczvo+XkXtD2C3aMQ1BR7vhi7RjezfudapG1Tqyv++3NJgNhu+GPJ3y
2dA9dqrvwoyoH8+Gd0S7s44axhBrBLVuCnP6Gfne545Own+Y8vdPb9+z5Nwa
3lm9twczfv+7yWFCuEfdZ1t4y5TX6LjPxL/4z6Z8n54jZoRcF+NnHzk2az8z
X01p34PaT0vjvme1b/fg72bccRAea8K+0ns+hN8XyfNbfJ8q9/5RHx3Je73a
Ddo3mk9hsSvkvzPvMyGstNs3E6ucHLZCt5b5+653Pp9yHeE6LMy15nss5yf4
CujlEt/n2uvaC8rheMp3vXqtCJ3q8L7cQrcy2C7A/ybilRH3U+o4EN6X4cQa
X+r7fFva/09o32rvajbkfxD6HVnvmZv93Ua2Ue3XrGMu7G+W+06Oop+JOibC
ZnOJ920Ddz094XPaHPMdrR5QL2g3aSfcyDkeumvtmpl820vOM6DRlNceT3mO
2ofa14WwG9Sj40ItqmlyzvtqHvo9U75P1jJ364ldgf1L9MkHKdeRrv63yd8L
ZV6Davkz7zWr9o6M28tPn5R/k87veX+P9S5XE/c/cilrXw==
            "]], PolygonBox[CompressedData["
1:eJwtllls1FUYxW8L01LozHTazkxhnNIWog88iQ/GCAiRKBQQwtISFAMYE2UX
MCxq2KFQylIpIDG0slQKJWyyiNEHQkyMuIVgSAiWJQF9kBdcACP4O555OMm9
//vdb//O/VfPmDd+bn4I4RToDupKQziYF8J1Pk5mvaEshAQHSwtCWNs7hB3Z
EFrANtAMZleFcKMohK+QeScZQk9wh7sX0dWD9bFoCP3RV8q35ej6CPlTyI/t
FsIu1v/2DWE465m9uF8TwoGKEGLIn0dmCOcPEyFUsn8M/mFdlkEXSIIUGM79
0UX2eWuMM+7fioQQQWcW+3eR+R0cjofQCdaDFOcl+LuuzDEptlL2m9ivSPlc
MX+G75FiZHuGMLcHeoi3q08Iv4CN2GoEQ6sci/wdxrotHUJTd+dgT0kIy2p8
ppiWsj6Ejg4wAt0jwa/4dgccwK/2uGM+n8tPO7EkiOEA+r7Gp/3o28i3Uvx9
mvMq8jEfnW/3cg7zuPsaNevA1hh0jCQ327H1Ya5mqt0wbA6N+pvOpiZsa1lh
CAO4/4hvi4l1CQiV6OJ8Decn0Leb88XkqzjfMo+R7ZV0rS/gXwexH8G/Gvxb
gfwx7O/G5y85+xEdM/Ctpsq6lI9Z+PFx2ucbiXEX+TyCzs5cjpSr/WBf7pvO
7mZdC9XkG3Tlg4WFzoFycYb6PROxj9eSrrlqX0AshaA66d5QjyTw9XCu3xRj
J+sIMt3BIGo8GEzCv4lgDb6tBQuS7nX1/FZyc7TCtdD9Y6w7066VataF/OaY
e1M9+hL5WM1+Vcw6pfswOejH+fvEFMVuqtLzspL9E6zbiKd/xP0/mf5s4c65
iHuspRw9xDYT2WnkYK16Kev9OvZd7Juw+Ra2LyJfgeyinP9XwIC4Z06z14D8
I2Qnks/LyP8MJrF+nZpNBduoYzO4nrFu2ZBt5US5WYwvS0BzzP0n/piOL19w
9xw4Cz4Hu0rsv/phOvslZeYG5eAIuXgB/4YkPeOa9XilzyRTwnoUOmtBA3Y2
xMwB/3MBvqRB/2LPs+a3Ad0H0+5N9ehO/BvR17MhH7fH3MPqZc3PEnp7C3ce
ckYpQxPrCSAfXVl0bEV/Q7lj0/0W7rcWW1Z3/qQf8tHxcoFnYAr7VK7fznJ+
E/n1+Lq+0D17MuOeU+/oTjfuzsbfTmxdxcYY8tMYt27xU0PKOVaua6vJBcir
9Kyq3/egayDyV5G9BM5he2/K/otDP0m5Z9W77ykH5OJ+sXMjvnoTe2PJxytg
NLrHgB3l7jXVTLVrQ761m/OxGX0Xku4l9dRj4luB/jmczwVd+HMTPEds48Bp
zj5IuLfUYxPor9XEvAqsJM+rwAJ64F5P5+hmxjKSHUiMg7LmONVqDj27kN69
l3FvaGZOcHcHPlVFXJNa9P1d7F6T/5qdaaXei3PEPSejfgvE+eL+YVnnfiQ2
nyU/x9OuXTsyJ8Tt5eYq3Re3iePEdeLkRnFz0rI/sd+G7VtJ10acdBr9k/H/
SpHzc42430XnIlCLX6OUf3x+lOd6tUWdA+VCMzeffWOZe0E9rl4XJ4gbSEeY
xPoQMh1Rvyl6W1pLXFvVcF/anCZuk4xkb8UcXwH+9MbXeIX917co60NJc4c4
5A90zYz6rdAb/hSxtJOvcdSmHpxh/SL995veP/R9r9nP+kwyB1kvpf6XipyD
eu43I18dcU894Gx7mWunGu4kX8WV5kZxwFFsN6Ucv2aiibvP93WtVLNFqk3u
f0X11Fv/atTcKL4SN/6VsC3Z3IWuwVn3lnpsE/00JZdPcW4r5/3QURM3h4nL
nuzj2ipH5eRmStZ8II7fEjNHZHPx3E94RrTXDI5Hdz2oA3vxa5/e4ZRrrfPt
4vq4Z1cz/C36VybcK8pZXZVrrFrPwYf59E+fSr8V6v/j6LuemzfNmGbtcoXn
Ud9u6N8oY67XjGnWqrBxLZij9DbO47y+0DV8wL4k9/+hmBW7OEfcIw4WF4+N
utaSvy9dFfZXNpdjvxZkCizzA/lLcn47Ypuy/Wlfc5E4Sf+SmhnZks140hwk
LqpTH4E75Pg2qOGsX9I2ZVs+j8OX0Qlzgzhd/zKZ3uYe+fNG2v9s+ncTx4nr
9E9QkHvz9fbfyL1vmjlx9Xel9l0xtCqX5e41cfSstN8gvUX6J9S/od5M5V75
Fvf9B50pj7E=
            "]], PolygonBox[CompressedData["
1:eJwtkk9I02EYx7+I/wK35r+pjdymHjsVeLG0KKK1/aZ1cBQUEhgV6jwUlAXq
3GZFCVvQoUOZM02o6KKsS5BYCa7LvAQdFT1lp/Dq5+Xd4cPz/J73eZ/v8zzv
L3gjfnmkTNIxqIDuo9LxamnCLd1tku5B02HJCzN+6dYh6Tm2E0L4XdgEuVPQ
UCs9JPae2FmfdA6+BqVCubTQKJ12SWegHb8Nih5pB9HGZilcJ12E2+h9IDaE
bUWzj14W6SkH81CAAWIb2Lfkz8FH8h4Rq2mV/qK5BxvU/4NuwWhx3g5v0PFV
SrPYk3yfgjZ6riP2lFgK0pDk/kAVPnYcJuALOnn4Tr3f1F3DjrZIw9yNY/vr
pRgs0fca/eeYrYYcF2TxM/CsAR3uzpCz7pV+wjq1x9C647I6Ru9XacYw/b0i
J0i9LH6E+k69ndnMHqN2nnpXsftu61/B74YeqGWWLe56sDuc77rtm5i3iUIY
XQfbW/K76MEhN9psd2N2tIL+CWosY3Ocz8Fr/A5is9gQb+3w5i+Y7xo9XYcE
PU7CZ+5PMscR3mUVjW+wRd4g+SnuLXD+Dh7j3yQ27bf7N+8wSm6MnuLGso9+
OM95xORRI0QfFyDPnJvMvRq0uzY7n+f8B/19Ys9Jv9VL+0v79todml1m0A6Q
95LYff6DInnRAHXRDPnsHsw+nIA968UmeWsPetPcT+BPtdhcc+cS55vkPaBW
ln4z8A9G2MF/+ntSmnPbY3dhdnIAEI57LA==
            "]]}]}, 
        {Hue[0.355976091014759], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtlnto1WUYx9+ct+nOOZ772Q7bOZumEBQRWEJeycA5lrdkXkLBPyKlvFVr
LW+1e8sL5swLqKks7yimWYLWMip0FtJFXJtahoEhGs4LZvb58rx/HN7nPO9z
+b7P9Vc8Z8Hk+T2cc938cvhtTTl3/hHn2iPOLUs69wn0JOgzWefuQ7+SDz/q
XLCnc4sTztUHnWuFf7vAuQ50D/TifgB8fl0Yrok514RcGn4z59Skydeg9xPy
Q3s79wvnxQLz1QR/T9i5OsCcSTt3Ft+/wX8u5Nxy+M8g34n8IX6PQnch8zb8
uciXQlfjAxduS55z66EdOMvBOxP9q9jZHnfu+6zR1wudO4lOVR/nTnF+EDQM
enedf5fwNkbN5iBsHvZ+W7CxI0DMsF/B/S7oEuRLExYXxWcJ/OU+Vge5H4PO
17nOjc6avuzoHTfBdBGZDs4q4vs6/Idgq8POFt71D++bGjVf0zi7w8bfCp6z
xLkndGXGuW0JkxGuVSHL1zjky7DVSS7Kip3biPyf0LfIywIe9Sq6y7A3MmMy
tdy3wD/Ne+9gf3LE8qh8VhQaXY6d1cg04asJO715ww7oXPDnQl8m1/1ThknY
2tHdB54wuteJ8xr8VcJfjPwB7OxENwAd45cDfzC18Heh5f0d5I+DoR16IDaG
FxrmKcSvPmYYhGWzf9f9mMlJ/jT2zoP1Rj/nfuVcTFwi8P/AZis6beDcqVzz
/wr8F0OWP+WxFdnZ6H8HPZr7cxGT2QxdQ46qyFEtZys6Ifz+BT8ZMvkE9CaP
ZyV42vB9BQylAcu5aqAix2pRdThdevgNQNcSs/FRq1vV70H+T0R2P/GcG7e4
JdNWH6qTt8DQTjzXwc8g05AxPMK1JN/oFLE6mrKeUm9JX3begBeFPonfUdju
BmfP/s6txXaD71/lfIN6H8wbOWcThx/QvU1tDERnLziv0it1GeujNvVjCbHG
TnWJ9YZqciFYmn1/qdfbfN81odecsjfqrbO8/VLoVeTmKDlaC5Zv4Z9D9xh4
Lvu58TPnsnyrq/nyA10Mf1/K/F/PsThP8xjUHymfo5UZqznV3u6k9bZ6vDlq
voXhJXwO7m1xE77dGYub6rczYrZfDpst2VT+1T/qo6XkvW+e5eVx3tvpe/wz
MCwiLtuJ5wP0RvnZorml+aU5VoXNQ9RKCPmCIucmKP7E4QXe9XGu6cruQ+L5
FX5PYXssuo/Bi6HbRRyOgXsh/js9PQ0bWwNWV2VRm02aS+9yX+97Wf3UErPe
1ww4kbIYVgcsf4qh5tCKqGGrkQ0fw66gxVF0f3jhlNVGMfRNMN0BZx3xeeAx
3+M+id1O9TIyq/LMb07cdoNm79MZ8y0MB1IWR71b9b49YrpnCs2HfGXjlifl
q9zvD9EXqOvuoNX5MOzURw1PA3ju+vfKv+aO5s+AuO05zU/N0cMRi20cv/0S
5lfYlRvF4T3sDUVuVl/nvgHPGmSKyNdqzjL4F7GzAiz/ZSx3yn9F1nKt3TUn
YrNCM0M5Vq4npG1vKV+bsHNvgPF/5H4NNv/F5hTuK6NW/+qDuI+5+nJp2Obk
JXiN/MLUQBPniJDtd+35PWCdBOb9nC1Bq4HGmO1yxX94xnKmWA3Dz7yAzSjN
qgbPfx9+PbaewlcJPu/FjV4A/lt+T2mPdfj6vxa3OatZegmZ9fgeB4Z1hYZR
+ZN+td/pz2N7bMh2gXaCZo3eqPoa5vNYy/2QrGETRu059WBVzGpC8orN72mb
/9oDz/o43OB+od8Lur/mcV7g7Exbj6vXVTeqn7v4H4P8Zeb5CfxMTNuueQ35
SMJyXYrtopTZXITsvKjNYc3jPf47YQQxvhu2PCqfqg/p1nL2KbKcamdq12oO
T+Dtu/hNJ1ZfcJb7flffV/uaUY30jdsu7he3HakaUC1kQ5brvYU2QzVLnwhZ
nhRv5fDNpH2/jeQ+Gjb7qv3Nfj/mJSxHg32e1Jeat+o1zVzRezkDijV2QpxH
EhZn1Z3erLf3KrJvRPmqTNqeVgwHIXME31PBOQT6I18bkZDNOM2Nz8Ez3veU
4j3X1+STWftWUJ1cQraj2HB+CoYNEfsO0beS5o7s3A/at4jivF9zoNhiexyf
67CbAduHnI38CvTtisyMuPW+Zs+FoMVZ3z5bsPslMtt4S37W9pq+K7VTVTN3
gva9pR7Xd8qMsMWsB/Uw09NHsPM/Mr2mug==
            "]], PolygonBox[CompressedData["
1:eJwtlmlslFUUhi+UKQXamc5Mp0yZTDe3xERiTAwmEhYFA1QoYJRFA5EfJiib
aLAgW4SmLYUEG4rgDxatiGxqBESNCy7RRBFD1CBQKFIT/2jAAK0W1OfN+/04
ybnfueec96z3q5m3ePqi/iGEDmgAtHBoCAugyakQpkAtVSE0DAwhwaUm+L54
CMf7hbCsIIT5mRC6cyFsgX9tUAj/Iu9F/inyb6C5yFeVhdCJ7pucNyK7WeW7
u6G6JHZLQjgn39jYhr+JnLsHhzCtKIR9+RA+SNnfCegj+H+weQ93z3Eelwhh
XRobAE/GQljLeQZ3HoNmQrOgHcUhEE7o4f4V/A3N2F8BNrLwPRHeTs6zOR/K
hvAn/GToce7XJu1vKtSK7KXIX0MhvitCeAIfJ5Edw38bjpqhpqHGICw3qhyr
clQEljM1ITTC347+WfjrxdY/iv4m9NL46I4Zo7D+gXw4+R/B/XPIvsy5HiVg
nk+ungLfjAJj/iTrmql2L5aGsBIawreLMce7le/r0b+AbjfUCP8ONuJR/paV
8518XIIq8D0MKi73XelMIr8TE+aVr8HIpqVc2/PUeDr8TvDuUG6xtw756Grj
+4IcjIUfTz7GQZvx8TJ0d7VjuUzNT5OPVvplA7SdXLwKjam27m3EP4dYe6Dr
0DZsb4e6csaXgpYQy19J+8/hvwV5D3i+JZe/gW8e+D7Gx0V8TaC/XqG/Fmbc
W+qxm+B5MOHeUs3/RvYAd8ZCI8B8H1SX9qAovhbuns8Zm2LshO/KWP80dD/y
qqxrL3yV8OurHK9q2Ag/iPuvY+8kNmqH0RMp13LpkBCW14Ywkjt7+nmGRsFf
ytmWbGr2fsbmvegu4LyYfB3JunfVY0fhW6BkoePR7GSrPcvyXwG/l3z1Rfl9
j7uxSnBgP8mdgfAnUo5FMX2fck+pt5QT5WYtM7AGaiAvyzUb2Pg16rcy/K1O
Gtshvp1FNo47pD/cwN5D8LvA/FnMNWqn7kuo17FC97x6fzw68wv87Tx+fqlx
ryiHd4C/ihxXQh1geQPakndtVeOx9EMTPTAs5h0wGn+bi51r5bwo45zr3ME5
zjmVsP4A8n8VX+U57zLtiDR8O/aqYsY/DXsHs94NyvlsYh2Vd6yKeSR8V9a8
anQRvg39yki/l/sbE+5V9ew1zm9LP++YFNuUKF/PqMYV3gHaBbL3Y9Yzodqp
htvIR1ve2BXDVvhH0vYlzFvKnXOdhWEz5/ehCwNc4yPwz2e92++E0ti+nLFM
d67A31Ls3acduBZbK2rdq+p/zfpBEn0AusAsdcW9c9QL2mfa9R3IPo85/2eQ
f5f3LtFOqSPeA9zZD5XQe/FK72jpq6fiYCuNztppgzl/hf6cIs/wVOpTkHEv
qad24+tD5LOQn0J+F/bbSr1rtXPngG0/NmoKPXOavYehupTfQL2F2una7S3g
bQdvQ/SeaSYbObeXWi57c9E7jL9Hi9wzWfz1lXn3CFMv/AvU8LlC57Mz4x2o
XdgUvR2L0p49zeDeEr9hess24mcTdCZjXdnIFZvE643RW3NrwrlQTr4Gy+Gs
3xrtgGb4enLUF3N9J+fcw+oH9Zh6bSpUr7nE927oh6zvawZX0A97SoxNO+Rp
9Wa0v1TTXeDrjPpT83uN2ZpHTz1Z7pqqtnrzhVWYG8jFhrTfZs1nM/zMas+6
/M2Abylz7pVj5bol7vdGNagjvt9zxiJM+7DfkLSuMNejn0k6Vp1XgG0CPvqi
eLWLfor2pzCv4e6QjHeBdoJ2RVmkr5l4i/yOifaBanxE85Vx/2o/XIv7DdVb
qvl4t8RvRDaa76vY6l/hXaGeK4BvTTt27ajmcr+Zuq83ZlK0U7VbD2LrELQ0
Yyx6r/6L+5tkyrFyXZ/3W6wctcZdA9VCOe3EXyl4EtBl7l2Bhic8G5qR3hr/
Qwm//glW43d/3v9i+ic7jnwVPlZC65E1Qs+W+D3SG3yKPv0fHU1u8w==
            "]], PolygonBox[CompressedData["
1:eJwlkbkvw2EYx7+kFVerdVWJVmPAH+CYHROJIzGIxGAlTMRAEHVWSYhEO6AJ
1UFrEUsRLFabWOqq2ITEMVh8fvkNnzxvnuP7HK9vcLRnJFNSFVjhoFLahzh0
Z+MvkMIuKQTBYumV5JBD+iT+Ae/wliH1k3dWIiXhBt8AtfX4Unb0LFKC+iOI
Q4ycQ7jwSU+50jl2vkjyG7iliSypOl8aJzfBUGPY9kKpA6zUWWCPGa6JRYnZ
PZIN4vRzMt84OndofqB9j61luToIkntKzRp2hV0CkGTWPmaNYRNwDIFSqYK8
VfSa0WqBiI2esEnMS2wLuw4e3hvYH6f0C8PMP8T8Q9hO6rqgySs1QgNEudUC
N5mjd4pZF9mjFX+b1+xj9AvQtxzdRXQfyX2A3DJuhS8HG6RmFZbQWOa2Cy5z
P2PPEPzlsA+zXLF7mhtc+8x/Mf7HTv0zOjbsC7ppKMfvhls008SKiPmZ4deY
lXkmmWMKZtnJTr9pfNO8Z6CGvF7ud1Jp/qnxt1/0s+RJ39gC4g6IMOMl2jsO
8/+MfwyhuQ1hELq73PcfnQ5f6A==
            "]]}]}, 
        {Hue[0.3772416217828427], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJw1lW1o1XUUx88y9+Duw+7udu/f3eZ2XSKRRCT2pqCwgsowN8HKBUIvhGC5
MtM52ppMa0skKjcz1DIoBjl9YQ9ULqzUFzJthrSlNqZFmbV0aLVpRZ8v59eL
e8/5nd/5nfM9j//8E80Nq64zs4P8pvFbkDT7tsDsQKXZwpzZcfg5yG6qNetE
YThvls2Y1cOvSJnNLTT7p8TPjbPN2uH31MDzprnYbKLarCQy+xg7Ywmzswnn
W9AZKDc7An8EX4NlZgXYeA1Z40yz+PVmrWnXk34P8qXIS5E3I1/O+Tj648jW
cI4hXw3djp0D083ezLqe9BeB9wbwry8yO0xM94LtAvKr+K0r9BiEvwZbh8nB
Kt5eJLadsg99j/M76E9H/2timY/+CehE0NkVMxsFz0X4AeQd+MWl1SFPzHJs
e+L4JBePg2EZ/DX4auLaCT8J/y9v7+bdU/gahH8Ie00Bv+IeyHst+sDQho2J
GWZJzqfzzp+CvoudQWQ1xFeW9NxeQf5F3mv6PvffYPc89p/B74nAD0EXBMwr
+dsVd2zC2ITvAjAs5v6tIN+Ozv7I+6GPHKyGLyInz0HTKefXwK/A7g80Vw81
aU153ob0LuZ5Vr6VU+V2N3FvrjA7inwL/BvUaQJ5HF8vct5PTbeUuT/5VT/W
Jj1exa28KD9zkT1c7jk8h/2t6E3Rk6/Xel+qP/uhfXHP7Sriaud3hbcdvL2P
uy7knWDZUOH8Rugo9sfgW8B1JtR6BL4/6/05Sl9Povc2Otegv6bcZjs2PwHf
o8zCPmzfkXQ7Y9hrIRfF5GQdtIpzH/IfsfNk3Hv1EPZfTTgG4VoYed6Uv69y
rqO+rgv9mwmzpLqn8DMB/xNvL0GzwX468hqr1jtiPgftRd5LH0U+Cx9C16V9
BjWLf+ObcCwXc3yyk0CnMNTuWe7HQ02fhj6f8z5Xvy8OtVBfn0x4fqbIT2uI
vRLDTXH3P4xuW+Q1/VLznXNsx3K+Y9T3irMY8JewUwh9MOl9EoPfG3fM68G+
D98N5Pyzaq+T6qUZnZnz/lTPqqfV2/XQGcHmA9jbHXf5EuSPhT3zCLSKXPeD
YxmYSzPuV33aQWzH0FmKzoHI63ASnbvSPtcvZdz/vEK/68XOVexsg94TdDaj
80ul53khdGbwFUF3xF1He6Ir8lx9AD1X4fPVy1yMMOOfon9rre9l5eko2D6P
3O9KZN9z3kQOR3OOVZjPU9/GlPfQ3shxyY5mTHtfM3UQ3Q701qGzAbo27Fvt
NvWB+iGq9G+G9oz2jfaO+rAcG6fRuZ237fhJVPqen11FHWMer/pLOVKMysc8
7obRv7nKcyGdLuhfKd8/r2R8X6j3plV6/4n/LuG7QzvkT2zvynq/qe+6wJFl
h2zg7bZqj0s7tY1zBfKNScckbCXYvBMcU+i8jHwSvaJSs1vgf/5/R2H/RvSH
wFkH3VrmtVBN8mEvqZd7grwb+W3gvJ/cLoCeCjkZiXwvaD8sn+07SHujM+3f
S+0W7RjtHe2Ns2DrTjq2RWnPu/Kv+ZYN4VTf9wa/Fyp85qWjHbMk9Lz2ur5P
2gOb0r7TlVvl+FC513E+fnoyrq+ZOBP2j2Z9PHz7XuD+ZJDrvj3gn5P2HClX
lyu8z9Rvl5FdSTl+xaFvsHZQd+RzKF/yqe+65u4P9Gdx9xs1qon8u6h9sjbr
PuSrLel7XfErds2e5iyT8RgUS0POvwd6+3vMd5n66hT+G8Is1EP/A04NU6c=

            "]], PolygonBox[CompressedData["
1:eJwtlm1MlWUYxy/iNTnHA+cA5wg7AtbWF2utrQ3KlEpNbaukVoltph9KSKHM
YCKQDEGsRG0lJVqt160XcxOtlbbW0g8GZH2QBkq6tmrK8gUx0HT9/rueD//t
vp/7vt7/13U/pSvqKmtvMLOdIA0sD5utzDS7wCa7wKxlmll9hlmIfX3MbH2R
2VOcr84yG02aNfItzNmUdLOGCPcKXFY6erg7BNpSzSZvNHujxOx8vtmfnJ8C
d3M/yv2xNJdZxH5NLLCFzZKQ2QzQkOE2GjjrjprtABH8zAELkTmf5jqk6wHu
zAfbWG8HVxLYBlenmv0HPsD++2AJclWglvVqcI2z66AdWcQsj3iaWTzG2aNg
nLPLoINv7eBiLjbB52H3V/Gv4HuCfTzsMpLdzTqZgg+ghlw+C0iFRaeY9ZOP
hyPuu2LIQr4RxNB1nZzNwZemHLMFCPSxf4i4T+V77lQD1WKolNyhq5l9H/sQ
sWYnPEfK1Qg+f4XtFOSnIvsC/vzNehQb07l3FJnFqS7/E+tB5Zb7LewH2PcX
+foMNq8ivy6ot2qygVjuKTabBWaDOeB+OHEfKGNdDtrxfyNozkMPOBZ1++KH
uLaRb53o68WfLu5tUo6V60Kzf8Fi7D9S5DVSreZhf25QY9V6DzHchC8F+NyI
vmFkh0AG3zPB5oT7rpg6Waeq/uz7kemCW7XoyA74Jq7/jA8DoB7fG0Bb4N9e
/OvI8RgVq2JSbPJRvioHysUZ7v9BQx2lxn/lec1Ve9VctRcHxcVq/KgB35OP
Ac6PgEOsT/BtGJwFo6COmNrJ1TlydoLznXGzg+mu/1X0bwIdYCvft4GKmHNH
HGqFW5/C0WsYv4X4DiS8BqrFa/iwBbRx/1KKc34D6w5k2kEZ63LwetS5M8x5
OOw+y/c4NUmA3oTnVhwchovvkNPdgX1xWZxR/jUvnox4z6h3NnP2CliIjQVB
TVVbcVBclM5V2NuKTFfE7+juc6BGfUEum8Ei6QAfc/cT0BT3WqlmrXk+k9Sb
6tG1yN2L/gqwH44eAE8o/6nOv05k1xd47ysfd8Zcp3TXBLarZhAHsbSQ06Ws
DyW8NuLfwYTPCM2KMtblYDzk+vehsx39b5b4LNRM3Mf5PyHvbfX4HcXOSXHz
PfydwP8j+Hg46T2gXngbf9+KOkfF1UF0HAd16H4+7jH0BvFvx4/pha5PnM/I
dw4rP/3YrETP42GfJZopI/nOCXGjBT0vg5eKvf6aIaeneg1VS8k04U8x+z7O
Kvn2JX62krh4uvP9LvK1tti5Ix3S1U38V4L49TaoZ5W7mfj4HXHczvk3nK9D
fzVnz+T6mXJ8En+jEe8V9Uw39jrxmSs2yJ2ZxDofHfPACNz4HQzm+KzTzPkF
+f0J7wXNjKUILs91e/JpB7b3Jj0WxVSKrUlingDLsPM0mMzz2iinyu1YyHOp
nIp74eD900zXbK+AI7OzPQfKxWfoP57i+ks4Px3Mc72JFRHPmXKnmTGL9WCp
50o+/lbqPShdx7B/c6HPTNVbHKsivi05zjXtl0T9TdPbpjdQb+HlkM8Ozahl
UX/DVU/16Fzs5wb5rePbxaTPEPWyevocufqi2LmvHClXqolqoxl1knoeLvLa
yV/l9iNy8mHcZ7Jm84Wk65aNnIi/EXorNPM1+28t9Fqqpln4uivkvagZdTbX
3zjNB800zbaCAueP3rA463Hqcwn0kIdd4EW+rQFN5LI55v8kenvEh1/xfSzP
86GZ2oOf1XBm5TSfOZo9etM1P/Tm7SH3D8a8NnrT32X/bcCXTGo8Ueo9r94X
Z8QdcUbc0czR7Lkt4nc1Q75O+j+M/mXU0+rtH6LODXHkx6j/A+lt0hu1Ctv/
Az25bOY=
            "]], PolygonBox[CompressedData["
1:eJwtkk1I03EYx7/2sjm30jl1/xmieelgncKoS8jEsDqEHiLw1qkublQ6tbkV
tIV20EgPokloRZcOpb2BYFBqB2cF4UzDDkEQechYhxlEnx8/Dx+e5//7P+/P
s/98pLV9h6SDsBt6A1IcroekmEuq9fGGHgenRnrskSqRsWqpEzIl0nGv1FAr
PXWkJ7C+T0q5pcgeqRV9uUCqL5bmqqR5+LxXmtglPQxK9+EBnPXb2CFiz+Lz
GjLopUXSIvIC+S9CA3G+47tZLq3BF3CT0wUe9IKd2FPT6QrJi90jajiJfgqe
k/sZHCDGEjWFyTFcKr1A9+DvBR/UVUpZej+EzFDXEhxjJkfhBr5lDOoq8abx
nYJy/hdi34Vvkl4S0MJ7hlquodczp2Z6i1NXmPyNMMj7APSVSd9YwBD/ksS8
i88m8VLkSYNDjUG4Qmw3OULov/GPFEpt/J+g50noR8/TR874EicNSWImoJM8
i8Q9Q023eR+EAajCfpz5pPg/RU9pZJp6bsIo+gxvI/jn+P4Dd9hDnj6Ga+ye
zb7H+D8Kf/l/j3mP4+ci9i/0ImSQ+A5sYZOHD/gcpo/3yHZs57i5T+jLkIWY
Y2fZ41h749dPnD64Bf/oY4x4vfSbo/4EO7nE+2X4uB27hxk0oZ+Ad/S8AC+Z
2Tlm9gq5wbx+wipgqh/Ir9zWOkR9tqawY/du9l+NvsEsstSygn6EHGuOna2Z
sblVc7NvoZu7f4OM0lvE3ILf2q9i37G9w4Df3o25n//am4dZ
            "]]}]}, 
        {Hue[0.3985071525509266], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtlW1o1XUUx49lzum92+7dvXe7927t3r3ojdWbmA/EcPkUrSiaztQVOKGt
Nt2yXIt0TbJcraIidVlLg4ggkPUAjmCGkIZpWhZzNQc1yEiUoGTGamSfb+f3
4s85//M/j9/z8M9v6mzouM7Mhniu53kxaXZstllBsVlttdk4snlRs6W8j88y
W8n3U1mzHQVmJ6F/lZhVYLgobdYcM1sNfxz5Gfgi+AUZs90ps/QNZv34WFlq
dg35XdBzJa7zMj63ozMDvwT5v0VmR8ihA/kOfP1K3HXYtvNtHvIPyGcW8W5B
P0ucJVVmt801W15pdhT9euRrY24j23/wk8mZdc0x68FuGTqryP8w+qvKzabJ
7Sx0D/kMw79WZpYnFmZ2H3n9jc1xbGegtyInlCUiZlfJc5h81qC4OeqYCJu3
sT+I/ErCbBeyo4WOy52hdmHwNbF+JlYBcbvAuWO+2TboUKHzqmEU+6+I9RKx
RrPuYzF1nIG/BD8WNxvgGYePlId6iHcH3zvJJ0btnyDfDQ5JYvVSywrkF9Df
iXwN/Ab0n0R/EL4C/X7VG3rajc534HgB+Vp8PM0TwU8rOm9GvV9b4C+Dywj4
/A4dRX8AeQ15fhF6oZ5cJLd2gPut0rEThpvSjq9wfgvZzRmfvRcQ3I/NPeT2
Jfpn4z4nYyXeY/W6psrfJdesdUcdk0t8vwm/h8izh+9j5c530JM9Oe/HOL7v
Tfo8a65/SvsMaBYmgrwO+Uzo4/dFjovwuUKsrWXuU3HO8+0w8veRPRDm7Qdy
OE2sNjBpRack6j1Sr/aHfknWlnadd+Dr8T8bn3dDb4z4rKZyXr9waCDnafjH
qX1Xsc+0Yp1GXh1xDHtKfQaFg3rWHWZY3x+C+YxamqC353wmn6r2R/zD1DWf
2HOwayafj4i1mliHwPlP+JPYxojbnfLeaQ+asy4/iM9I2mdG9+AJdIqFP/rH
Qv61+MygP4J+C/rflLu+Zq014CA8ni/zmZ8i58WhL8vR3RjynwbvdMprVM91
pzQzlejsy/mO6A6N8L4An0egVxPeR/XzPDk8Rz4T0Hyx16hal1JnPTjUQhdG
fY8+lTzM2wroPmxakO+FZmJ+f3SH6sDwQWy7sW1Neo2qNRt0esmhMea7kCXH
A1G/A69TRxO269n3DdC5Wb8njaq10vf0BPNSEfGdSqR8zzU/e+M+c5q9H8Gk
ptT3UXe0P+l93EicfNgFzewr6PXh/5mE3xThPAk/WeT5d5F/e9Jvbyd5TkGH
C32WpgKGum36H+i/8GrE74vuzBs519X8SX9blfsUNuvJoYVerIM+FnZHe6k+
aB9l31fkOOuWK2/lP0gujcXuT3dIOf2fG/LeQsdN+F7k/Rfkl6FlKc87lXLM
xMv+vaTPqmZ5Jzl8rHsIfTTMnvY1Df6LyKccWhfm4cM8N50ZbYLfimx7wjHs
hU7EPXfd2q5Qr+reXOX46P/ZkPSeqrdjPM/i/1zW76PyU2/rwr91Urcn3Cvh
pPm4Fv4bbWGuZsDpRKjlXWiam3mK/MsyvrfC7du43zhhO0CcZeEfpzv3SPiH
tpS6vfxoj4fivo/aY9Ws2v8gt77wD9Jebgn/6IXYHuD9c3wOgs1/Fi0siw==

            "]], PolygonBox[CompressedData["
1:eJw1lm1M1VUcx0/ycCHhXu+9XOByQS6WvrHeZPmQ2QOttqilheCEXM0ZlRgo
D0IqIgjaWmakgRbkWi96Uzm3yrnMWUotW5lLEpBVaJaCYg0pIVd9vv5uL767
53/O+T19fw/n5i2vfLxiknPubRAP3khxLsRvWaJzS8P8pjuXkuDctTjn7gg6
N5HpXD5nn3L5H69zL3PZy1niDc69xPoB0M/6F86HWA/nAM5/ZW+Jz7lm9DWB
O9E1H1zB3ijYkOFcA9jIWShmb1cq32nObUXXw8nOtU5x7j5k7gVN0gXe5E42
uq+Cu9mvmeZcxWTn9nI/J8r9iHMPepw7gI6n8Odpv3OHOdvMXh9nnxCPH9lm
vk/xHUGmIM501KIrGX+SQCLwgD/wtSDZ/MnPda7Nb3wcRP8zIYtJsd0FFoAh
4i9Psvg3oH8wxk8J9ur5fog7/2KvmjvbiSc7ar7LhyOcrwhbbIpxN7GexF4H
ZzNlE98vhoxr6Rxg/Soc7oe/r8jhVrg7FCBX4AvOvgS/I38ZXAIjfuNQXGpP
ZxfBMNjIXiPYiI0G8Dk6joBiv/lWi/0sfK2Dgyfwdxk4Tn52RI1P8buT9Wp0
xOPPjfj4bNByovgK0dFDfM342ARaQCvoIsaVicbH33BXj3wdqEG2FizhvBj8
SCw/gTzyEQWrOHsedIasFsuw347+z/D5cIwDcfFNxHKhmvyW9Rpy6kuwms9D
PpO9OR7L50o2F8N/IajkbDVoCFvsiqec76v4WJVk+enEr0r4mITufvStYt0Q
NN2yUY2t++FynHU3OibQ1cJeOMHkVcsdcNgOhuBiGMwg9uk+i0GxpKVb/s9x
v4j97dx9BZRwVhowzsSdauot9D1JvvbD9xj+ZiCbg/2j8dazPyA3L2i9pp7b
8n/OZZP9GaDYZ7bEVxj5PQRzDPm/QBbfXpAKFnJvkc9qWPaVw+eIbwA+WzxW
E+q1nQHj52O+21j35lg+1CMXWFeEbLY8gsxjyH7EnQ9BPbIvgGp8qgpazpX7
y2AE3AbXs3KtR8SlcjKOvs0pxrU4z0d+HrjCej82/vSaD/LlZ/aSOPsAHY3w
dSs+Zvmt5lX7R0E3SI9a/tUDRZwPeE1eMSn3GVnOfc35Huknf++zV5hk+t5j
vQnOG8FCdC0CfTH5UmxWc74czrh+vefV++op9VY/8ru5PzTF/Nc8W6bZS7yp
4GbsTge7Ilb76oHJ5CWXvakgkbseUJ9r+tSzg16buZq96kH14llsngkbp+K2
N2KzUfkbwH4PMifBOHcnwBzuZscZv3NZ98Fhb6bFqFjX5FpsilFceTKNa32f
5nuF32aZarrHbzNVs1Uzfz36G/FtX4J9b+P+aJpxK4634d8m9J2Ls5xdz13s
vZDMi9jvjtis0czRbG3MtFwoJ/tybGZodqjH1eszs6w31CO3sK7mfhWoBWvB
YjgoBOe5ewF04UNnis1MzU71gHpBb4bejo6ozUL50M66LGizQzU0Fbl3U+1b
M7KA+yPoPJho87uHWK55bRbpjdHbOzvWr3qT12GnNGxvtWZMHWffBSz3iuEE
67KQyWum3ZRqOVPuVBOqDU/sbcvkLAx2IPNawGpKtaUaVa2qJlQbC1KtN9Wj
5eguClkvqSZVm+vxYV3QZrZmt2Z2Taxn1buvB6yWVYOqxblR40Zv8nzWpwI2
azZgYxW2jkVsrRmmWTbqt/7WzNyC3+npNttUP3obS3w2mzSj3gnZGy/+NYNO
R6wHlf+lvO+lvO9rI/YW6/18lPtn4eZMms1gzeLuWO/PQu/tPqsB1YJmkmbT
idg8Vw8cZ10yzXSrHvdiqxMdhxKsZsfQO5hmudUb3ZZhNaRa0n8g/RcqDVlv
6z/LbOIfS7H7qolL3Pvea7qksyvD3gi9Fb+B82n2H0n9o/8o9+SaD/JFPXKA
eh/3mn7lS7OwMjZvVV/6L9Mae4v1puht+Q/HgHh6
            "]], PolygonBox[CompressedData["
1:eJwtkrkvhGEQh39uEta6fdiwWavRWaJxEwWqtUFsJ7IKiXUUrqw7cSQKV6LA
fyAiCg0qV1AiKBAkjqC1hcKzWcWTed+Zd+Y3M99nbfM6u0Il5UIE5CVJdvDF
S/E4elKlMu7+EGkG3zj3CVhIk3aJL5ulp2TpGWxxUnGUZGRKvelSH/wa0lGk
NBkrZXPOgTeL1BktfWCbyGkGf4b0A6XZUl2MVIEtRbcE5tA10JpCtzpFqoIZ
OAyXZrHb1GmknpV3PjRH4AP/C/H3//eBvCiIhD5qu9E4Nwf7CfTVxTybaFg5
t4CHnt3YIfSHwaDHdHCRv0tdJ7Ybvxfq6Suc3G7016lzwHkDe2mSruCN3bzC
PDs4p67BnB3kxPLOg13Dvw7uRKkVvtDd490n1kGvBVAEDmYsZ9YTtI8hAb0z
ejnl/AD3MMDuW/kGLnotJO4AJ74GfIfkTnLvpY6fcwW9V8I18QniN9h79B9g
kB0OQD9khUlb//5AfB9fPv21J/Ad2OE2c4wxbyMxF6xQx0O9VWwc85nAZw7u
947cG7iFb/K/YJR4CrER7A591ZJbRa6dXvPAzr5ywQah9LKMRjT5j+RcUHeR
+xLUWII7mjYF/6XAP/UHbgNlNg==
            "]]}]}, 
        {Hue[0.41977268331900996`], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtlVtsVHUQxkdQ2tJ2t3u2u93TzYazRXnwzdhYDNTEqH1TC7ZAQoyGcDEG
EVJLNNhKqz7gnaAJAtUXX1BDIcqLFQwRFNEQEm2xsaQiNS0tihgkQVD8fc7/
4WTOzs7lm5lv5pRXPb10wywzG+SZzbM0Z/YLMq41283zD8qX8mavR2Y3MDxR
Z1aR8/d5jWZdBbNJ7Odjuyjr9v3Yv1s0W1dhtgt5T9Ar3k6e4k1mvdhMZswu
8b45bRYRa8/NZhP1Zo/j8wi+q5BN+F7Fd0necShOK7pT2J0Fw1t17iPfiw1m
R0tmj1aaNROzH/1xsPWgX07eWeSa4v+mmDrnEAd5nFpG8f0auRyf9fjOYNNI
rmv4vo9+W43HOUm8GP0V7JdhOw3+PeB5Et3GarM/55odrjJbkXfMwl5KzPqo
5Zkmsw9yHrMNLCsjx/8m+A/hczt4OvG5Vnacndg8R29/RncQ22ytz2WL8NKX
ZejXkP89zQv7h8AzQT2fEacLvE+RG7hW5n1TwLMAXTNxzvH+BTE7iDPB+2J0
J8B5hTh3YNPN73rex+jDeM7xqH+3MaNR7FO8LyHXanK1Iy+lzD6lJ29gO1Tw
WsaKPlfNt46Y39Y5Z8Sd1tD/IfBvr3Vs6pk4IW78Ln2Dz/QsRVTG3of9kXNL
HBCn2ohRw/M8v8cj798IeQ+Aey76FwrOCcX5DozdWcfzbNq5Kzx/E39t7LWr
B6pNNe4g3kCNz3cdOf/IuE1/2vknDOL7hcAB2c4nzhgx+6j1VMZ7mIBhuOgc
EBf2zTOrBttW9OXQhyR23q2pdJ/VGa9FNf0QfPfCn4fDrh1t8BhtofYzJfc9
jTxJnQPU+xc2g5H3TTzKUsNl9DnkaMFx9tR5Parr3qxjVX7NP5V3Xr1D/h1h
Z9ej60x7nHrePwLTILz/sMl5r3dhbck793bSk3LYX3EwDhyu4H02ucZvgVvI
q2A9SPwRsL8CP44R/7Wc16O6rrMT0znn2API7ZHP6G3krbXeE/VmU9hB7YZ6
JP0celtZcHv5aU/+r4s4WwIfVsS+J8LclXUeK9f9yPMBw48l75F69SIxhlOO
eaDB+aQ4iifuH6lyDLoL4sYU82xNXL84cX6o/3tJuC3kui/nu63+RNR0LPLd
/DLyOoVf+zcJ1iFyTMd++3RDRomzkN8r0bcg40bnwBT63RnnSA95LxL/V/S/
Ie8O9t9knOuKrz5tDdjEkSw9eQKbx7BtD30TL6rSPqNXidOb+A72YV8VOCPb
/YF7qdi/DZrFWuwX8F8H/fykpI+MYxPGc+GGa+/vSvwmtiTeX/X5+5TfStX7
cr1/h7S/G9insbLP/QzydNFnoDt0OPJbdwR5IXZf3d1O8n1M/Dzx/xX/gHID
uShxHi9M/OYK/2b0vQW/J7orX4W56Haqp8K/i3jV4d6K+9VhLxVXMxcvxYdD
4Xuk70ln+B49KD6HuevG/xRuu258Eu7DdeRwuAm6De2Rz0izasx4Pt0VzVtz
n0E2g+1zct+ZOLfEMe2QvoXCcBkMI/jPsIOlgt8L+Z7HtyNg0+3vZrf3EadI
nFzifWtIvN8bQ13/Ad/sPuI=
            "]], PolygonBox[CompressedData["
1:eJwtlUtslGUUhk8p9jpTZzoz7UzHOjMsanQhQWprlAJKdSkoLcZLvRRra+xl
yj1CKJiQqMWYSgSpJW7cCAYTowsvaAjxsjCEha0ap1EBI1gFSrTYFoPP6/kX
b3L+75zvO7f3nD/XOfBg/wIz2wMWgu6Y2TPgxpBZBjyWMHsUNIXNmsHJuNnX
2P3CpVPIveieAwNZszxYnzLrBE+DLtDMW03g+evNtoPJKrMCGMhgD77i7g84
PlNs9lm1WbYOHyU44PtVvtv0Ft+4sj7eqcXHu+VmR8ESbCfSZu3Y3oLNd8ib
FpntLnX9ZuRtIF/J23zfxd0+fPaCFs6Xg0FiyoMe3n4WvBPcf487R5Ab0XWU
mZ3FxxfEc2+9WSv4B9+zYFnYdbI5wXknMazl/jzxvk1uNyTNpq7jLjmW89aJ
arevIN6d6M5Fzcb4jmCzqcYsTL4hcCWCD/A78iclXvNjFCGvWoMR7r0GdnE2
BF7E9iXQTI7Hyr0mtyFP6Q3QwZ3HwfFqr3Ub8TYQTz8++2q8R+rVOXJYUETv
0J9H3ldr9hGxHSL+k/RtP/mm0f8Nlsbcp3y38W47OISPMbCfOhxIe017Ak6J
W4cXeW3Vj37esoT3+id8FFOPJznrLvV6vYxuKOm1CoF01Dkh+w/xP4x8IOLx
jYlDceeguKgaqVYFcogH+UwiT+bMLlfQd2K4E7tR/B0Es+jmwO2cfRrUbxx/
b4Sce+LgA/RiDbVaDUY5fxOc4exjdAXmYQ3xrMNne8Jrrto/gb6nxOt1s/gV
d1vdOZvyHJTLNc5eEb+4+wG5/ApW0J8N1H8QNGB7E2jgjdmAL0Po/wo5N8SR
8+j3Jrx24txExGum2t0HitDvTvq3alqL7q2Ec1WcfSrtNVFtjlODFuQLUe/3
DLiEXEj7rK0jhh+R10f9W5xrwv6bKu+FeiLuzMU9N+U4ju51/J1GPo3PEeTF
5HMriJNHAuzAfnvAaXF7T9x3jXJ8ATmd9dnWDmjH9xH6eRhMc/cyWEkPVwQz
qllVzsq9EtRFfQY6gp2m3baFevxMLr/x/sakz4x6Lw40Iu9K+t1Z9K3wJMnM
14IZYrkCJsA4GMb3XvB9vXOtFzxEf7qiXivtIO2irmA3inPinnJW7tqZ2p3a
acpPO+hb6vt5MK/akYt5b1nWe6Oaq/bqoXqpnfJltc+UZkscL+Sco+Lqw7z9
SMp3hnZHN7n3JDwH5XKVXv0L7sj6ffkfx/9F7lxIeY7K9f163x2KqRFfU3Hf
Deq3ZlE7UbtxJTv2bjBIb/Mx37H/79qM737tYO1ixaBY6vCVBht0J+P/CP0r
tBPFdXF+BH9/Jnw2NCPTVT4D0muH/kFewwH/tUMO8l4E39NFPsOVyKPY7Cj2
GdhJriUp7704UIZ8Lem9lo2lfGY1u5qBffifqHIuawdpdylH5SoOiouXqPVF
sJSzRrAx5r4Vw2bkqznnh3bsfM53qN6vJodt5DpV79zRztoqvnE2s9C/TxH7
Kt68J+MzolmRjXSySWFbWuOzpRkrR14S89lV/Nrdy0FL2P/Z+neXU6OytO8s
7S79E/VvrMCmMuw5KBfNlGarlfqsAnPUZh5s5e4WcD93Vyd8BjWLilGx/geR
3jDj
            "]], PolygonBox[CompressedData["
1:eJwtkT1Mk1EUhl9Raast2D9oqYVWSd3sYBAYgMGuCtbW+BMTNMYuUgUTazRO
TAYSJ8GQQmA3IQFdwA0GjImDnZow0BrTgIZqQsRWjT43n8OTc77v3Pue95wb
vXUvmW2QFIPDEApJbXDHL1X47nRJ9mbJBuGA9IVDx4lxvouHpA3OzcMChJ3U
wNci7VHzEoeC0u1GKUW875VGoR6WajCOxo8D9KLmoU+Zfkl07PR3wDRMwQso
c26OWrZD+ovh98fQIh+DBP9f0++Z3/Jp/HajdxaW6ZOyS0vEDry1Q0tEeuWQ
/MQz8Ja8K2J5NzP4//tPo/PRLRVgkv8TUPJJeWqeNuknHvahG//XmbGX+IAz
K+SfyKvk35zWfaNz2czL3QD6dyHETC/xOEKehXduS6eHu+fYcQJ+kdfhNySp
nSCuMcsNZlon9nG/H5r4v3VQWvRITnIXXIOrcAW+06uC/iP6eHjDHPE0bxGH
GfabsUnD6OTZ4SxcpF5DL0p90LwjFJm9xO6/ordr5gta727e/yYal4wGMY2H
FGxTX8VzhXieMw14SNHjIWdy8KeVuaDQJL2hViN/wo4eQ4Z+efrv4PkU92Pw
lF1v0v+k0XVb+4iSj3JvDLbxN8t+g7xNKwRgkL4XYADNz9Sq5EfxcASe8zYf
0Ihw7h+vCmpT
            "]]}]}, 
        {Hue[0.4410382140870942], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtlX9olWUUx0+/psPt3t0f7929u16uuwmRQbOcraZl5SRIhtOVf5iFbNQS
3M1pMcwVs7KYWcIGWRODqP4ooT+CJKgYWKxGhUUyGzXCWS1/lGKGOZP6nL7P
H+97zvs853zPec75Puet73hsTflKMzvAcxXPdwmzV1CijNmT88ymK81eZS1C
T7FfrDJL1pmNVZjtRm+dJZsb8BlPmw1fbXYmZ/Z+wews9k3VZj34HsemF7m7
1uyDa8wGkE/w3YvfEPgn2O+bYzaFbM8L9+N6s7uKZg3oF4n5Ifg/keyuGrMy
uDVXmL1bUgyPtT4y24vvGDnsR2+Imx3BZiRpdjuxRsBuRj5bEOYMmI18f8T6
zchfC/Ktjiue26xg7Rb27iPPTvJsA/cgNheQh9j7Ej2N/TehblnqdoE8L5Nn
Fozl1GI9tVqCfJC9Ss6+AbkNnznonRlhOeb5GPh8V7C+OiO87/ElfTsG/h+c
pYxfHtyvWK9D7uK8x1hvZf0S9aqkhv8ge/PCbPU61AnnRmQXexPoC9EvkdMg
MVqyqr33YDvf3dR8Hfpm5GRM+hb050raX1NSvbxuTcjTyJPB1+WpwIfmUPNJ
Yt6fVO8G6N3Xkc70M3It59yH7RTnW1GhHFqQ63Ja3wfHbqpTzrXgVXLOzzjv
XHLuj9T3xfS/Gvt7sYkh72FvhhouRr+DvfPYfFpQv72nL6MXqpTDIjBvy8n+
b3IbYO9z1l9g/yHwM+RwivXpnPL3c+woiadlfC/C40l8LyOfnqezD4eznA41
mcD/d2zqyWskcObtSP6Os7Okujh+v98hct6I/8M51dox+rLqmdfhW3rbkxIf
2nLqn/dxjLif8LRjM5/1R3LCmSHmdK3u5lHw7+R7lDM2FlUXr89SYl6bk+91
yAZiHAe/nXq/Eeke+X3aGOL2oI8m1efahLjiPHG+bGfvT2yaUuKr289geybw
fBXy8TATfDZ4z6dC3yuJu4geJasV4/9Y4GyKlKf385eEuOHcifOcAzOBLPPE
qPMm5FuR6tyR1/103Wu/LK+zLGRtZSQuXc9aKiM+OC8ejTSXBhO6z34PfS76
TPH5MIz9gozm4V7snwo8+Y0evoQ+is0eZCncL79nS8Ic2FPSXPD5cIJeLC+K
b+fA+SIh+7tz4rfnNjsu/jn+WjAbw6zz+ep19/rvwHasRpjPc4iVgf9tYL8W
+vhipPwc5xn0N9PiwM4qxfBYLZG+fb3fORITZ5w7P9Zr3vrcPRtstiLHk5o/
Q3nxzPnm/J3Pcyt9zOfFY1/vRB6NNEs7yP31UE+f2f4P8Jq3Z/X/8LgTaXHU
Y3nMoTDrfOatClzyOecz74FZ2juS1x3xmWE53cN/s+KY636XfijIfhu2JxPi
qnPWc/LcDoM9iU3XbM6N7A7/mvFI/x6/p4fIbW5Kvn34TgdO+tzy2eE9PYhN
X1q697kz4C+F8wfgwXvk/U5J/1TnUhev1XH1y+/fX0mtO9e2hPtVLopDzqVm
YnWHGeIzaUPgtt/XZWHubWV/QeCAYx/O6yx+JueH88Tn5WCo/2Z8/wPw0jBP

            "]], PolygonBox[CompressedData["
1:eJwtlW9M1WUUxw9dBW+A3Av8LlyvzHtvL5rWQgNTN8n+aC9yFIG1/lg63SIr
0QVm5LWhlZtpoKiouPWqttTm6kWuTcutFaWpyOYgVtQyydI0s6xGan2+nrv9
vtt5fuc55znP9/x5UouW1TfdYGabwCjQWWi2GTwaM3sM7Ck12w1Ox82GQWGR
2WE2XgJF6B8ocln/3gqQC8y+wE/fjWZ7U2al+CoBq9BlQF/CbDDXbF++2btp
s/dSvlc26yvMWvH5EqgsMZsMZmPzWY5ZD/7bkWuIYT72nSGzNHI7NpV57kO+
FmObP9qMXxbHfhKYCLYQw1bQQLw/5ni8P2G7PMk6bPYn+5/H/8BYs35gyDng
dmyngC5st4Mu/m0Dm0En2BE1O4N9LQc2cLcBfP6A/8YxZkPID2PzBLow9/2X
+JLlZueJr4v4T2AbA7eE3MfLxDIA193ikztGxhELZ0Twdwj9DPS72P8r8pxc
XdDsCP+i3H0J66dZr2Z9Nux7tHcfuB/dCGfO5ezPy+AT5LI3D2T4tyrkNhls
d5K/HeAhdPUgRQxJ0FFMjYDlxLMy5JyJuw2B86kcheH2Ir5/A0fh8BhoTjq3
2t+CvDjusSrmgHP2l3ruv6cIP0K+knKuxKG4bJpg9ji2Nfw7EjGbiY95Ieej
Bvlw1GtB95uB722sZ+P/FPql6HsD33+A9RTWF1ifB78T2yUwmZhPctZXcP4p
591HvurzfP12tgZUCyF4GgUO4v8AeIE7NoNGaoPPLuBjCUIe9oOsjxJDAt7W
lHt+z3H+K5w/H18X0cf49xTyPXGPXzV9L/JVfA5xl6vw8Td8/FfuudadriFv
JAcbwJugHfRFvZZUU4Pw04vNcXAC9IF/Is6NaqAQ/2EwBryP7QegNeH1uZ/7
1hHPzELPl+p5HroqYmbbdf6qkYc1C0o9x8p1lDtHQD4oELDPL/SaUe1c7xlQ
ha66xGeCelU9eze5XUt8ayI+YzRr1uPzw9HeAz3kZyvrLeA4ci+YWuj8KWez
iK8OTh4s95pWbaumc7N31F1Pwc8u+Anj80lmwwrQEvMZp1k3mO03nbmJON4J
PPeqgQX431Xg9rno67BrK/VaVc1mkB8JPJdV6nH2byzw3pXPfvTrij2XqgnV
Ribbn6oJ9f7EhPeOemgSchs12GPOz6vI0zlzWsx7Ur35HPKz4GdsfwFlSZ+n
qsEg6T3aka0R1cp3FT6L1E/9rIOY14tyWoK8O+2zWD5Ocv6VUo9VMV9DfrHI
uRMHZzhvbfa+ykEb8p1p70316NIJnmPlWjO8NfuG6C1J8++mEvcp36rxkTKf
oZqleiP0VowUey/pPpeRpyH8wXos+5vw0x31XhKHmnXiQFy0ZHPbXOS5UrzD
/D9U7LWieKvxvyjh+dW/hcgrs/NfM21F0t8k8aGZ24t+HetMvs/I15DnZN8b
5egu5Noi51Y99E2Fz2jNJs2cAe41lPK1/H2LfBs98XWu50C9uyftOp25F/lg
yntPPTiLeKfGvX81I75k/0LWC+L+pulty0t47SknqwN/8/T2ibPxyJ/A98fq
K2rnDbC9wLlVvhs5qzvhb6HqbyfyOXyfjbuNbNVz6r3L5Oov0BH4W6yanRv4
TNVsUD0dY/162mevOBN3y2KeO8VzKwc3lDvX0wlyfML/SaeYb0ZOJFynPc8E
HrNi10zTbCvIzhr1hHrjdOBni9PKcf7m6O3RzNDs0AwTn+q3HtVTNl7l5w7k
2sBnn/Knt/p/dvBRng==
            "]], PolygonBox[CompressedData["
1:eJwtks0rw3Ecx9/mYdjMHjyb2lPt6OkiNe4O2FwVuShkZdnFLpxtKQ//gLs4
cMHFYTUuXEh5SFkymcxDEeX1aw6vPt/f5/H9+fTzTkQjsyZJbiiHd5u0Vya9
1EvPkIejOumWpIdmKQdPYG+RMhWSE3tPPAtBl2Smh8sqjZEzDt4m+tDYg52v
keKQckpJOLZLIYvU7ytivPuwFnKskKX+HmL0S9N3kxkRvsMwDPkS6c4h+Znr
g3CDVMGsWC2zeVfxjvO2E3MY4Cuw2yC+dfbagBMP/mq0YDvJ6YIOaId6azFm
5Bi6Df1XbdJkpXSD7UXDKDcIYffRcQCxRmkOgvhGiB3ic7dKPRwmQP0QdxiG
And+hRQa0mhKYgP/NX7sIrdZgm96XbPHF/ac/AtIoP+N3XP0nmKnadjhnttg
o3aAHlvE1pi3CjPEbfSIYhPMWQAn/m40mdFWhp5SMMEld/7hzmdwCito2KV2
mfmf8AGP+H/5HzLE/gAValDD
            "]]}]}, 
        {Hue[0.46230374485517817`], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJw1lElI1XEQx8c21+fzqc/tFfrercIySaPADMuoQ5B6M9EIVCKqQ2kur305
hJpZ+bJbhyCibnUzKwkywkwDMxXbLNro0AZl22eYX4c/M//5zczvO/Od+QW3
7S7fNUtEjvLN5utMFhlDCWaJ7MwRaUI/5xPZiz4dK7IH2er0buzNaSIz+CxP
EcnFfihaZCQgcixdJDJHpDeRGPR2fHrx/+QX6YsS+Yq9OsP0L+jRxNzBP8z5
QJLI+FyRj8TdR59E/44+TvwF8mzgzr4FIltiRG4jh7F7sS8B8zP8eshzl5xP
yDWFvhJcuR6RYrC9wD8/U6RyHv/IAZ/pBeg7yOvhrrBX5KbPMCv2Ndi/o3uo
MYL9NbU3kvNBjtWeh33s/13ELgXHS/RpbFFeq2sFtS4KGIaFyMVOV1xXc+yu
RrBdSbaeaG/0X+2tYOgi1z3ydCMP+C2n5v6N3y8wz9Cn5nj4ijfO4rzmfwbf
4VTryRDyQ6bx0o/elQ3H1HIaWQyO53FwFLQcmkvP2lw/NUcYnLH0KsydTegt
3NNDPyoCpp9HHwdzHbw8RW522OZzPgQf16nrbLphVXsZ5w30Ngv7O2L3u7p0
FrpDIofB0BkynpSjQmR+ivVce18H1otgrkVOc9927n2FLM+0OelJEEnzOcz4
f0603uoMvnH+FfQpDv+N+FzDd8Lh34S93uWPkGcZ8ZPaQ431m/4Q+cLNpN75
Hlkda7P4lzqnqPEPch01rKWW9cguj9WrdY8lme8p7V+2xTYji9Isp867cjER
Z5zqLil3o+Rcy33VYC5Bjjh+dfb7wV8F/jzwjyYbpilsCR7b6+KQ/au9EVub
23fdez1TvQP9MvpB5nMYbB2OC+VE3wX10XzJ9KUeDFVgOMFZKz7HQ7Zvuguj
frOVuVnS+dJ3Q2elIcf2aB/yqeuD7rHOh87JILUOBQyDYol1HEUjw9lmfxSw
N0V3ZFWmvUE6GxGPzZzOWEWG7afa9a2qwf6Y/JfAlpBie+1DltCvt2D+hr2G
+Fryn8V30HGt/LfE2ywp/p/MRgz/P4K2k7prvjTrqfY2mGF5Nf9Wfa9SjTvd
v0r+Y8DWwJ2FXsuvM3UkZHccDVkNilnn/aTH8ug7NOre1VupxpNyoRyWOr60
N8XgLkUvIG7KzafO1DHHkXK12vkUIVd77b1qJTbfY/N2g7pa3L7rDrW7d1t3
6B+VlPHa
            "]], PolygonBox[CompressedData["
1:eJwtlUtsVWUUhTdIX7a39972Huwz7a0YtLw6ItZESeQhCQzakmhALFolEAit
CQzaXhL7stiqFApE6swoE0CNxAdNFHQiJgRbamyrNo0BysM4aIgtSavgt9hn
sJL/P+f8e69/7b3XSTY01TUuNLMUWAQWBmYLwKICszTQUmZWn2X21yNmv+aZ
TSfM7nNgMs3swWNm35eavZxp9ssCs+9Y90XMiljfBWX5ZifYHwdNi83eBEt4
9jjYHzU7ALpzzN4GbZxtB72sL6WbfQCZC+TqrDBrzQbkby43m4fDHJgBs+CB
+IA5uMyDqiKztXz/0aNmu5Jmf/Psd7h+CZ/hXHIRL8X7fdypkXjt7FvYNxN/
H/usIs8/QP4R4tZy/xrwAlpsBHV8X5vtMbpY98K5BxyC9zugl3w94EdyXQLV
3HGSWE8Rc5Dzo4Hv2zLIhy47k85VnNcR7yv2f7BvZl9dbLYSPlG4XePMKtZv
oOHroBANi0AmMTJAMe9KwAqeLQdLwZPgNlxugTHuMp5wzaX9VNzsJjiHhl+A
z1h/Dp4mtqHXLDlzOH+Id915nkO5tvI+M81r3M/+tUKzV0El3y4D83CYA4fV
C6WeU7ljPIuDf9DkAmdvc597aDHOfizXe069pxiKpZ5R7+iMzk4R4ybYTf5I
mF+9NsSZiVDfBvg/i2br0XY7PfkD+Y+x35nh/Tua55pJuxJQCj5F77NJr6Fq
WYc2tWAV56rAnbjnUs695L7Ks7cyvF7qNfWUekszodmI5Lt20nAPcd4L50Ga
bVvsz/TuQ76ZJHaKnshK9x7voP5dcOgsdQ2lZSv5WkAN96wFP4f3VT88F/WZ
1N10xx0Rr7lqr5qoNv/B6d9wRjQrz/Dsfb5vJ18f+fbT8zeYhT/puTWcnwm8
NqrRaWJvqPC76s7rWT/P+Xr4bgM/wb8nz+8uDbpYv8QdXwTXeHcdfEPOr8F5
MKgacn4KfMz6k4TXTLXTTIwF/kzv5AnyhiMVzlWcz8L1Tgx+oINvOwP3HHlP
Jt/MUcfN6LmpwGdWs5vIdy9SDVSL1YXOXXe4HHePk9dJI2mlmdXsamY0O8qh
XG2gHQwl3BvkEfIq9bh6XT2kXpKnyFvkKfIWzXBz6Df98EmVee000+Mx9yx5
l2ZAs5BLTSMgioax0DPlnZppzXaywOut87/FfIY1y9Jc2s8SayL0u6Fcn2nN
tjSRNk3Eboy6h8pL5VnyLtVItZIHt4U9qF7cjl670l1DaXkEDfrAJrA5cA+T
l6k/hrhretz9UT2t3h6Iu3erx1JocyrweumfcZH4NwLXQz19hfWVcJ7k2dPS
X7UGp+F2JuE9pd56hbvWg4sJ/1eoHvLugRyfLc2YvGw2/FdUsl4GqqLuDfKI
NfA9GM6fOMvbR4r9PurH8cB7Vr3bC4d3Y85BXNTD6uUnwJJC5yiumgHxVw3u
wf9omdde8aXNcOgfyrECPb5N+uxJoy286yv22uqf28rZk6F+Dz2i3P8hmhfp
tZq7/A/HhSWy
            "]], PolygonBox[CompressedData["
1:eJwtkt1Lk2EYxq8+TF3Nd8vN1j5IcwXpQSKMDpKCIpqk4PQoK4ks0RNF0cKc
YiCGs7Voo1Fn/gEd1HmGUn7QX+DqZDilziKhnZj0e3negx/3w/vcz33d93W/
DQ9GuocPSzoPFRCvk94dkYpeadiSRiDHOQs9AWmfpH/EhF/qgjL8PCpdI698
SvrB/aZHmj8pPYc4uTchdlrqPSa1EtfI+wqVnNv55iI2o9sE+RPSkksaaJC+
1Ehvqf2C3AVIwa5P2oHfnAtobaD13mvqVFPnA5ofwU8/Pvgcke5UScvEXEh6
VMksxBQswh4ay4ekNHNk4BU8g1mIuaUb5F8hb6xeGoUnsFNNn2i2oXcZMmd5
c1x6Sczybp2eXxN9vPc72Ock31a4myFGaqUwJOnRzRyDzJ5w/O0KGH9sn1bo
+y79r0bMPPZcb9Au0cO405Pd2xb3A+R9J07S71MIB6UQBOGAJS/gyxk0/zDv
JHX60XwIj52ZJurNnu19F6lzldmbqJMgt9syftm+dVpGq0DOIv6nYJWd5Jlt
jp6nIM0/9Ik6Ufw5B9vkDvFml+jmfQ30oX0P7sNf8lN41IE3t+BCyOg3E79R
p4/9Xnf8tn1v4ftF6LFM3RJ1JzhX4d9t6jUyZxQuBYzn0/Z/Sp+/wMO9Bd46
sysX7/4D+xhqAQ==
            "]]}]}, 
        {Hue[0.48356927562326213`], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJxFlG1ozXEUx8+wzazt3ru7uwe323VvSLY1tRCN8pgXK5nyQjGmyauR5mnL
C2Yp8zDMUykpijwreQihsEbygtpQYrlISa0oa83n9P2XF7/O+Z//Od/z9P39
Uo0b65tHmVkHZzTnbrHZ8TFmt5FNZWY7MB5Kmh0rMPuLXhE1mxKVXhXVt+tr
y3Vc9//bJ5hl8sza02Zvi8yys8AC5yL2vfgsRf+NfRB9CHkgbrYu1+wwcoTc
Z6lhGDkmZPYE/VTCbFdMejvyXlDn3ULV4Xk3lZjV8e8W9i7kMPUvyDHrjpjt
JN8a6qkm/31OzjizK8jdBarhDzX08H0U/SX+u6k7jd5WpuN6DvaupDCHsH0I
m4WxTyNvE3UOk3cK9ln0sIBebqXM1vP9k7nWkGdhWv5NKWE55mHwGvAZyTbL
wlYd+HtcbZnmtorY5eTIxaceeSSt+r2P79QwiH0mvl/oeYAaviIzpWb92L8j
w8Q8BaeQGudz3qMvw+dgWv3WsrcW7L+wT/TdMetrxG4j9gLz7QbzPPM+Vyw9
g/82Yu8wz0pqqIwLvxrMSmr9Qf3TY8J1/Bf0lSF2CKJFxjN3+l80Fl4lhOWY
l/h/o1D2NUnFeOyMcsV4bB8+S4L91pBzH/kbc9VPQ57404/eEpd8Bs6TYNc+
syg9Psc+mf/FYPayxyhyYb644btZXaCZ++x7gxqcF1UT1O9rYq9HxGHncmtS
eQ9hP0mODrBOIPsKxeGhUvHY9Wwwe8Lqxedxs0g4V8B7wCxW0vsjZGdcfXUj
m/PEJeeKc9fr3Ap+RVxzcL63Yf+G/VREd851v7fOe+fqVv6/TAlzP3Fz47pH
fp8eJzSTOdgeBnqMOV0LevQaT0SEtxmceQF/rmJvCGbl93sPfd6EM51h9en9
jgL/b0p9eX+TysWrNnwzEfHNeeczcn+/984b589UsHtKVYPPewU4p9njSuSR
pGbi96wmmMNi4vYlxB/nl99J3+e7sN4C9xlkJ29i/znyPNidvz2L0uLBYmR7
WHV6vXND8n9FXFVEnHucFEc9Vyc5x4XEf79n+YF+hpnUlal+n2Us4J7PeyP6
aPCXlOge+jxbqeFdQjvy/ftdchzH28zJxr+uRDvwXRwH83LA7S5qzo+IK0eT
uuceO5DQm+hvo7/ftcG7NBv5kX8bqP9zQrm9hv6E7r/vZUtI+/O9OJfXp/S+
VYBXH1LsJ/z7wrp7beT9B/Fb6vQ=
            "]], PolygonBox[CompressedData["
1:eJwtlVto1GcQxScmW93ENbvJ7iZm3a67D6VgC62iomiqaIqCL0ao4CURa4pt
Qd/UeMXEWN1EE01IKti3CqIPgiAasd5QI0XEatEklirEWqVWlOA1iv6Osw8H
Zv/ffDPznZk5m16+unrVMDNbBwrA1ZhZX57ZAD/uY1enzOaDOeVmc8GLErPB
fLO3nNcVm92Iml0Hd8rM7oKLo8wugCx2MxjEPobvu4BZDfe3EHMzyOPuMPA/
Po/ANfz+AGWlZk/I/xG1lGB/kjDr4feiEWankmZtGc4KzZqKzDqxr0TM2vP9
98/8fpU2+8/c/zX29Nz989RQid1Njk7so9SzlbzbR5rtJ14H337lHb9xfgrc
5OwWOB51/1/w2YHvS769AD/Bww4QDJmNAGMqzJJgH/U8CMIdWDeWt1PDrOFm
j6lpPH5fUsMX4B5v+Qc0gK1gG2gCi9OeSzlPknsNMWZBRj1v7CJ2ATF6ifU7
36LkmzCauOArMANcSnn/viVnD/bZpHMhDk5j70n4WYDfNcTqD5uFib2Mejfh
X5/yM/msx+7Af3nOvzbkPVA8cfwZvzfgUxv0nJXFzpHqr8Ini28756s4z5Bj
OPUXUnOwwmdGszMh5NyIo2nk6uPO7TzP2a96U35X53uxPy332VPNf1F7D724
BAp5exGYSg1TQDd+J8s9p+6rH/Vw2ZhxW98aMs65uB+ipjfgHDmyQa9hJnE6
I869erqB+0tDzoXqu5L2mB9i41NHvmu84UTQ+dxIrH1Jnz3xX0q8hXFqCviM
3yf2c3bhGTjELB0GTWBbic+YZu3fmO+i+P0T+ymcPQHvODPydWV89rUT56ll
It8GA56zgHwzyTcDhNilUaW+M/LXzuzO+Ixr1s8Q8ywYF3d+tePPqaM57Lui
eezmPEGMCpAEH4Nq8s0v9x6oF40xz60aHnL3Dm/8G0wnbmXcNUHa0MOOXQb5
pb7rH3Ye+0DUd1E7+Q38VnEnP+D1NIQ8hmL1E/N2xDVH2iPNkfY8xO7DfwhR
20L9X/PG2UU+L7Oxx5IjBVYQow7UghqQJXYz2AVawCK+LQZ5Edcuadgc3vYo
6vun+I+jzoG4WInv93GfOc3eJLifXOxv0tvU8wWc90b9rmp8QK3z+BYIOAfi
4kfu/FDsnIk7aa60VzuuXe+jht6Yz7hmfSnfloAod2PgDZwPhb0n6s3hHJ9H
yNEYdo2V1mqGNEtrMj6rmtm12PfIORBxTsSNZljn4rCK89aUz7o0qQ07Dlex
kGu6tF0zplnTG/SWDr61x9xHvuJc3GuGNEvSTGnnTnqVBW34tIa8R+qVeii+
xLm0ry7tvdSMfpd2DZYWS4OlxVMTrhXSnCLecYPf1xPOmbhTj9Vr7YR2QzOv
2ZcmSZuak65d0jBpsTgVty252VCP1WvVqFpV887czmp3h3L/j5rZ1by/Nae3
0she+G/J6ak05nPqW1vmvVGPDtKX90xMGV0=
            "]], PolygonBox[CompressedData["
1:eJwtkTssQ2EYht+2FHVtXYqmobMSBu1ISMUgEWeRuCYmE1ORmIgwGmqU2FFC
IjEwisbIgg5CLzGUSITluD0nx/Dk/f//u5zve09oZt6Yc0pqhmIYqJdOiqS2
gNReKXVAtFqKQJ5YhlgOfQpKs6WSwXsnuV2w55N2YapR+qXZNGo0SCWcR9GM
V8qCkxoHRIm/E+tGx4mPQZz3N4fkr5V26HXB2cNbgm9ugUluv1v6Rs0a6cuC
4U3YZKYYMx1VSSt+6Zjea+gZ93PIEc9CJmj3DQfs/aw9H//3eUDDrdJpGe/o
NTk3kOTs9kj76AI5i1DexGyQZKcNl5TiW73ceyACCd6uvHauVbNM/JCZljgP
t9g1Q+wxwtkAWb6R8wO3XAt1eBKStvnuegU7UbcKaXrewyB+uegXQ1/JNfmR
KfwoUP8CPjzEKvmonWCeSUjhwyU8E7+jNo8e4HMaP/rw+QOPP+EPjGpR8w==

            "]]}]}, 
        {Hue[0.5048348063913464], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtlE1IVWEQhl+1Mr2ebveK13O72L1KGZH2QwtDQlTctApuP5DQLwopmbvM
VSAooUJWQoWL2gSBJWSrQgiDUsNVLSQSgsiiZS2iZc803+Iwc+bMvPPO+813
6i8NFq+WSrrIU8YzXSOt4zxMS1M5qadcuoNdqZU+bJZOx9LOaukvOTnsKHlr
+OPYukj6gn+GnNV66WeldJbYcEEq2SKVp6ShOqlzq/SM2EDs8R5sJvK+1v98
RsqWSN/Ib8uCQU4Hdiryvn0Z721+L/7SdjjAbR2OG+C3w/kQnF9WSIMJqVjm
va3X3bx0lG9d5ByOPM/yv1JXnZSOwe0B/lCD117DthBfg8+r2Oc3HebpuQzW
JD0OgF23w3WoMI617ps2H3Pev4l5d+O30WsP9jXvCfSZBr8pcDDu40FPw0vy
fSzheWN864Lb3DbpYOT5zdTdDPnWsyly/AVyq/jWQnwv3GbTfi5/0HaCvBfM
8hacWTichP8J5vge4svEV9I+7wizzoR9mCHWGLum+wv+bvExO6/Y8a3Pb3A+
o88v7LnI9+d2znUxnsZ3gX4/NpFL7aca18d0Wgo7VgRvIvIdsF3YqHE+dg7G
z3jaHAlm20Vta85nsFmeFHxO4zOXdn7G8xH+jeDbri2Fs3uX93M1/Fbwm1Ou
22TOdTQ9G/ErQ6/+2HWx/CPGJ3BOsJ+j4YxGsPMF3/PH8L3f4Oe4CkYh7K3t
8mLYgf+7kHUc02AKTlfgdivv+235Vjcc7o5hvwm198DuSLqei+TvC/zt/PtC
rd3XVBVY7P+prGtkWj1nhzvJKaXvQNLvm2lezPgMNks397gtdkzDfp/y+9gO
TjFofjzvd940f4rOl2PXyjTrD35Fyu+MzZim9nqYxf4HF1K+A6vU9oZ/gv0z
/gFWtKJJ
            "]], PolygonBox[CompressedData["
1:eJwtlMtL1FEUx4/vdHKmmcmZMRGnqOiphlpQYRi9qU3PhRoWWUGWm8o29jCK
oBfkIv+BIltEj5W9SCLo4aYXVlq6K8OU3BSk1efLmcUHfr977j33PL7nTt/d
vPlQupk1QCbsSZilZZs15Zr9m2J2K2I2kGH2FWNNyKwzaHYDrk01uw5tcbNT
8Ii1x3AfuoK+JlvddLNauM/eB3B1hlkgz+xswKyD7w3ctx4qCs0qYXaRWXUO
a5PMotw3ju0PjBPLBCxlrTfNbDMxfSwwm4ttDvRj+wy7SsgFzhebXYB+YujN
MrvHmRfE9YpYhrh/CeerOfeFmMYpQB97xthbzloZ7IV98CzoZ+VjEPsH+YMn
nOuGxeypgkziyoKOYo9dOcwilzH2/ARTXeEN/l4HfU22u3zfCXrMir27xGut
+BaGzdIhDdaR63ooTVLfXM+/gfVjxNIS956oNxeK/Kxy7CHXuWH/l8+H+B7l
zhH4wZkROEl/T0BmPvHDohg1gE/Usg/W8L0a2rCdzvceqpddqV6vwFYNfdzT
DzlRs2zYwtpWqCSeClhD7Gshgxqlh7xmqt1RNNAc8JzKyO0MdxRS73TqvTLm
Z3S2lPUyWIqvmeSzivou5/s5Z0LkWo9mX3L/siK3ac/+hMek2JSDclHP1Lu8
aegQcsO+V5o/mPA12d6y5x00EesBGGDfYNg1JD1IM9KOaqRatVLb43C5xGdH
/hoTrklpUzVVbS+Rw0Wo5bsO2kt8r2II4L8n4r2Vxl9E/E7drRqr1tuYkUb2
j2L/i70t4rEopla+9xJrY8hnQrMxQS7j01xj0pp6rF5PZa0AovQqAvX43Qm/
8fEr4j7kS2uyFbAnBiEIRr0mqs3TuNdfM92d9DdAb0FvalakMWlNmpf2E5yN
p+7U3e30/wo85OyjpOek3KQBaUGal/alIWlJM6RZGpaGoRxbGQSIZTKMFbjW
9WYVc/4OtbsNnfi+mXQNSUsDzOkgLGZ/FcxjbX6++xxOzYhmRW+I3hK9YXrL
1DP1TjkolwVJ75c03DLDa6RaqcfqdU3Mtax8zvPfE/a3TzWTdjPZm5GaGc3O
d2o1FPeZ1Gxq5jR76ol6ozdXb+92YtkB35QvvIP3sIn7Nsbcp3zXFPps6D71
6lxqvlTj3Kif0dnD1PYI/Af6ttWD
            "]], PolygonBox[CompressedData["
1:eJwtkcsrxGEUhl/jfplhGPemwYINjXJJuYRsiNSYKIWS2LiUCAuUIgvktiAL
NhaukZViY2FGdqjZqJFy3fgDjHimn8XTd/q+c973nPNldw+5Bk2SsiAcEtOl
OwJvqnRilU4hL1OqipTyzVJJslQKZfGSL0R6IX6DdwjnLgw27VJ9lLTBWZkm
VUAHtR8x0m22tIpeD3qdZuMtmNPGfSu0Qx21c9TuJEqPodI02iZ0Q+E0QXJH
Sy4HHtQ1wCF5fvK6iEPo1wTrOVIsflcMtkq8Bu4UqQVckE7v8/hPUntG/Mq8
H/AJcfjEwva//xb+o/Q8Atf4LuDv5ZyCSXDicc5dLv7JGZINkiDAYmfQKKCu
Org/TidahbBrkWqZc5w5x/Achz7qe6GIvurILyf/2GLsY5a8AJo/UMwfFUE1
dETwN5y/7KWfHpbp5xuNAPxwFwBXmvGnN3hEJ0lfzDvMfI3soQmW8FmElf9/
WeZ8ws8Pz3aj90J6clqN2T0OIz9Y92CT7uEJbR8eHvwG0DYR16BtwS8e9tnR
HjQ7jP87IL6ECzjKMnYxgdcf4qpaxA==
            "]]}]}, 
        {Hue[0.5261003371594297], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtk09IlFEUxc/ojJF/mhlnmvlMbEaz0hajxRRWKLgKijauDCQijBJSVy3a
tGkvUUFREK1a1CLc1CLKBoM0W5RkECG4khaOkkERVPa73LcY7p333Xvuueed
135+cmiiRtIwv1p+yylpIyF1R1IyI1Vj0nhSutsmzZInyMf5Fq+TtqelGfI1
+ko7pd4mz1eoHaNuKy6Vc9I+atbBvFaQzrZIvxiUAXsk5/kUfQ27pN8QqWSl
S9TXgH+8VboP7hw4jeCd5PwHNdNwfFKES730mPg25b2f6L1BT59hEmfz0kfm
DjJzoV36Sd4Pxkra97oM5kDk5/bddrMdj3A2BKcz26TRDmm+WVoF8z3xXuBz
hzjQ4nzKxAutXvOOmkqY+wxu6ynHnyn4PJtruu7OuVamX5L+U+w7TM03cJfB
76N2reD5B862wGkDf5T6va3O0+6kM2jbQbwF1+sN0u0O38FqasFZKDgH47KB
Rg/ArGb9Pqz3K+dLcP5M/oUYZfxe7H46mdWPDnuIE2Am4DlJnCu4Plc4f46e
ce7iEfv+iZyn8Z0Kd9HD91zAtPs/xPkgvYeJPcEzJ9hxf+TeO0B8U/DeXnqf
plznLnrHAv6/lO9mOz5sdj8ZvnG/ii718HkJn2PsEAPzKHE+771/6Z1Ou+bN
YMYi12Qz6140HONbDVrZ91V6voNzkHxxh5+vg/ei6LNeFf2/nZvG9gZsL9vP
fGx+vhi5J8wbr/POw/iYZpthlmGfbnIvmafKwWPm/SbeyBw4jcS6sHsfui0F
z5h3zEO2V4a+c+zYRV4quu/NAzfBXAz15q9S2nU2ve392Duyt9jd4jzNy5XA
2d7Tf3Wdoek=
            "]], PolygonBox[CompressedData["
1:eJwtlFtMznEYx5+3s3jV++att9LxgnJIbaG5YLFpWC6aSg4brYmNXNlywSiK
jc245FYOQ6subBXNXcUFNscVrlwgozbTRvl8Pe/Fd3v+v/9z/P6+z6+o+Xhd
W5yZ7QUJIDXDbAGozTTbCfrSzWZwSEg1u11odjFodiHoPvLdhE8g0WwqYPYp
ZPYIn1R8OxeaXSs2y8g225FklsjZIP8H+N8Pbi426wGTWWYTYAx7HHTnmXWB
B9i94EfYc6vGBmqtzTWrTjb7Rq/5fHfRy3mwGXsLqAFbQSdn50A5NavizX4R
/7TAbC7H7C/oJ/cAGF5iNgQGsYdiPaiXD5x9BEnkSAQRYjJz3Ee+HfTcCWYi
ZtMgD598UJLtfL2gXmm2+8j3MTEjoDhq9p1/JXDyEPsJNWbxf83ZW/ze8/3G
/GwCu5JZ5rkYftsUXASC/n+U+CD9pHAHyWAXfvXgLD5nwt6zen9Ob5PEN8FZ
Hd+7i8wai5xjcR0PP3FgG37bQRn8rgbl2BWgJuJci/NKzhuYqR7MUWMeNMPp
QXCJXJdBivLpvkEb8x0FCdh53MER7ER6TYj1rN6D5FwESolbIf2Qa7jAORW3
7WHnQjNr9jWx+9Q8o/j1FLo2xXkvWt1DjSZwj7j7oKzQuRbnyzhvBA2gH9+B
dOdM3EnT0vbVXNeKalzJ9RzKJY7E1SSYCLnGpLWRkGtdmh+i1iy+v8GhNLNW
MI79mVxBeliK7100cEfa525vgf3cxb4i16C0qJ3T7okjcVWd7VrSfBuxq9L8
PpWvI+oalVanpUXwLFZPMx9QvULfPe1gX8g1Kq2KI3GlHMqlmLGw76R2s51c
J6VxzjrAKXA67D2rd2lIWtJMildPL7mvG/hcB13Y3RHPoVyaWbNLI9KKZtbs
gQzfb+n7D3ElcL4crCN2fcRrqvYXcnzN8p0pifVbG/Q3Qm+Fdlq73Rp1/f0k
YXnUYxSrndBuaIe1y5pJs62i/5Uh16C0WBH1WOVIiWlS2pQmpU3t4P9dDPjb
lBpyrcv/MLEtxa5N6aeMfy1R17524FjUd0a7ozerK/ZG6a2SZqSdd1n+Fkjz
0v6JXM8nfl9F/M3S26Wd0+79Ay+Ryvs=
            "]], PolygonBox[CompressedData["
1:eJwtkbsvg2EUxp+PtqJK28+tSKOkUhRpG3EZEEzYXGo3kLh1Nkv4ByQSNRgl
tnaQGNqKAaPBJbT/gUuQSCQifl8+wy/nvOc873neS9tSanazTFIzOCFfI+Xg
oVG6o3BLHKqXLgypo0WKQCf0UXtGH6uWeq01fKL9gHe4p/dYJ60FpFWo9EsO
l7RO/uuTguXSNbok60WYbJAmYMMrveBl1Er7eFw5pDQxbUqHME0+Bf34jVdI
CWKK/U5mu/22l+U53yrNwXEIX7d0Si/P+os7jdKPsu6BHH03/a2glCHPwhl1
J7WTkD3DmhXHMwYer32mA/IC579h3jm6PBRgl/oOHJn2m7nQJ7hXHJ649yv6
cMDWWnv22qXtKnI8s/QzYDZJM9zHSyzyht980CX1In4l+DHtv/J7pAU0Sehm
5hvFks/2sjyHwaA2RiwyvwQrnGcZuv71EeIg5x2AKH85wpuGedM/yeFIyA==

            "]]}]}, 
        {Hue[0.5473658679275136], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtU01LlGEUPTY6mek4H834jkO84xRkIpISVL8giGgRI0YSRB9UGLoqaBOI
QgnVvv5Aq76DJqdmpiShWiduWtQmyqBVWIukczzP4uHe986955577p2BMzPH
p7cAmOBL8F3NA8124ArtSAY4vR04VwHOVuyfp52IgH8dwEYaODUArBPg9k7W
M3+AIA+ywD3WPybOKO0l5ieSwGXaZ2VgaxfQKPtb8Snar33AKjG/0K7xrRDn
OnEK/faTPcAi8W/RzxWBeX5HbcDhAvAhZv9twPvY/dR3pATMZV0rjEF+P2H8
IH9/FDg8LLu/ZtnFvFXi36X9Qz7tYZYK8dELvGWvYdZOxs6vRuYnfPURP/mz
9H+m3Osa8z9xlqesbTL2JjK3McbvZ42vPrsDtwOMH2O/34x35YCFHvvjjCVK
5iaOLb4qeS+T/6sd1l97SHdzT4wfpT4dOdcKr8n8O/RbzP/OvmvSjTkvgw7S
4wS5bXCuycg8xEeaJTn7Ev0bjM13m4O47ImMc6HXuJv4nPVzxns5VPDMmn2O
8V+Rd1fj72395tzk/eyPrP1J6lqNnaM9vwi7Vkxc1WslNpYw6ynvXr3Uczbs
QrfTmTHmaOQ72LyHvPup7zI1qwfO0uZI3rvQ/XYG3aTfML8XeFdN9n3Nd5P+
EGNjJeer7nnAaTA+VPRetJ9G7NoW7XSYUbzqAWeRdm/IHyz6JsTzHXOXAk/p
VAs6NPp8E+Kmu2iEndbK3oH0+UsNxoOG0nsq/L9maNf58ox/S1tH5V9k3cfw
39mXcW9x+JHyzamX9PgPzCeWYQ==
            "]], PolygonBox[CompressedData["
1:eJwtk01IVGEUhs+MZRDccbo5etPUmbRNtak0opa1aFEtDMp0pyS00Z1kuWgh
1aptBbV1oggtJQ0jzaDFtOlnU5YVQUU0RqFgRY49r+cuHvj4znfPec97zs11
9rb2JM3sEKyBX6HZT9hXZbYfCpVmf3nweq3Zp2qzi4HZBThA7CDks2ZDMJw2
G4ExGIWKTWZp2BmZNZaZZeAL93fIneNcIl87sbPk7IdbKbPbsDdjdhchT6C8
wmwrb5pgi/LAYXJ2lZsVE2afyWUbzVZC1yRtLWhqhnnufkB7g9dfpl4H5yTv
E/CP2DI8o2YBPtDnR3hF/ZdQ5O08TBO7l3AP5MVTWEr6nWLdtWanoKBccBQN
RwK/U6yU9tplaD4deU3VPk4fJ+A3d9dif5Yi1yAtC3iyCOdCr616faF7IC/G
YQJ20+uuKvdIXslzed+G9pPQQKwepohNQ2/kWuRJD+ckWhMQ1JilatxTeRvB
QOAz0WzyaLoJO/BmhtgU8+nj/B6Nc9XuobzMw1DKZ7o623ie+saY52Tspzx8
SL6vae9depoj90TerMSz1Y5p1zQzzU4z0Wyek/dFxjVJW1uOfnPuibzRDDSL
R+zmuvVml8k/ybkj8t3TDuapsULPJRhF11jKZ6hZbt5gVgcTWf9WOR5wbqz1
XtRTE+e31J6FdzBX6Ts3H/9D+pcu1bGXMEzukZRrlFbdKTaLR2/gDG/74Xzg
3msGC6HvgHZBNVRrII5/h2+heyAvWrk/FriGVS3VPpvBjP9L0ltMeQ3V0sw1
+z300FLrO6JdWeT9AtQTa4CrnK/Adb65EXoP6kWeyTt5JK/0z+jfmaHmY7iP
V+NZ91TedjKzLtiO/9si31nt7p/Qe1FPg9T7D4Y5thM=
            "]], PolygonBox[CompressedData["
1:eJwtkU0vA1EUhl/f8THDENoSqt2gpBFRCf5FVZSVFAkbdjY2FhIk2BJh2+5o
tNGEaEuRYG3BT0BYkEgkxDOZLp6cd+6cc+57zvXFlsKLpZJaoQJGW6QRGAZ3
ibRqSEedUlWNlCLGTSkBGfQp5F3STpmUtrVbykGwWUqWS5foW84jlVKPh29y
r8BPbx81A21SCIYg2SAdQ7fHyQ8QDxulA1inX4F+a8QZrxSD7XbpG+MFaubr
pVe8dnFfAHrBi+8OmEL/MViUaHKPAQFL2qiWzulzZ/dCPxDf6fUBN+hr6Lec
f/foCPW/9JkgpshJF3Ptmhz/N8nLEj/x+4aXBTwNMmcIxvARhlm/NF3LDMQz
r+Phwq5hri94MZ297aN3YQ/mijVBy/Fke8sX7+uznHnsuSY5i0ITe9tit+No
k0c1oA5+2NUK3pbhBH+PvMMTPEPW5dRk6BfnvRLwD2yrT6A=
            "]]}]}, 
        {Hue[0.5686313986955973], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtlE1IVVEUhZc/+fPq+ZfPe9X0PosmWiDpvAaNChoUmlYUZKJh6LQkaFIY
NK6JEc0MijLQMgszxaAkSJQIpIgcNCgSyqiJ1bfdZ3DY++2zzj5rrbPvazg9
cLg/V1I3K481lpWKUtJjYgErovitTOpskH4BvFMpNVZLbzdJo9TTW6R8zn2u
kFpj6Qf1L9RPgb9Fn5PEN5G0BGaF/a60dLZQulkr3SuhR460EPmyvI8+/2qk
h+Sj7LeEnnuIgwEzQv0K3JrhVl8u9SaOX4fX1TrnaXynEue/Cp/j5O3F0jHi
CdY7+KzDvYBl+murpGeR62qiTwLPFeprGWmGOy5vlq5vl37DY1+B9Ie4kLh2
82CZ/B/5Ac71oK0NjUNw3EXfv4D6qB1MO8awO2Ovt7BfH/y0+yfKnP8DfD7H
fTnoWqzw+9MpfxvjapxT3Hso9Jyg3yfODNNzHn8GKryP9WsKd/WW4n/oeYRz
ixn3sA59t1mXyJfglgPX5kIzRdobuw81aZ8D87MLXe8T72n6JvldDK+LeP8k
5BPEbcHDjR6xz8DX2Lka5x2x8zA+Cxl/S+Pzk94z7O3G555y52f1eTTNhvkc
J86Bu8abdqPpdcitZm9m906SD9F/zQZ7q7S/yvONGnvD4L8TGzPup81CR9Br
75+f9Z4zYB6hvY28nfxD8HmZeLTae67D7Qz4VnxL1fqbma48amuR4+19lsNZ
q81E/qYvwYyV+Azb7K8Gn18lzs949qNxrsHnyuZrttJn2GZ5FnwHmC7yF8G3
6dg5GbdctI9kfcamItdjuoqy/g1b3fZbwqzavJgG01JGPI8/09QHM/5tGP45
fUoCZjpxf+0u80Oljr8Avi1x3zqJTxPH27kbsc+bzd140G7f8d3wn2Dfus2x
efUx8mW5eT8SMPezrs3utbf9DzUBt4Y=
            "]], PolygonBox[CompressedData["
1:eJwtlE1IlHEQxkd3/ap22xXX3bR4X1e6FYiaHerQrajsEBlRQaAWhKE3pTL6
QKno1KEoKq8JHSpQLAMzQyM9SVJQt6QiTe3D6GT1e5g9PDD7/meemXlmZqua
O/a355tZI4iC/lKz+yCaNCsAQ6FZ8SqzGBhLmw0mzAZAYp1ZEhzNmB3JeIxi
2yrN/kL0D649MbNd+OwEbwOzd+AwOFhi9rPArJ64F3GzUTBZZjYFVvB9nGd2
CJ9WfM/AeRrkwxUBv/hWEzG7w/sydhtvj/D/TRMd2A/L3BbHILwR6s/DvoZ/
FLslcG69D/A+QQ3jYA57Hpyg/qYir38f+frgvAd6Uma9oBv7LOgEXWA65fyq
ZwHuUbR5Diao4xXIr+C9wr/pbS12vMI5xKUYxaqnN3AlyF9P/lnyr495DuV6
j/Yf0j4TzSZbblZd7t/0Jo2kVR0ctSnvSb1tha8BBPiG4Byc3eArvnPSLu5a
SLMrG5gL336AbfhuB8Wha5emvsLQYxSrmWq2F+G6oLnwbRksgcUch7ga8dkL
PmF/LnVNpI1mrtnfptZbKddYWg/m9u3SarPrWbMZ9Dkf8d2cDjyHcm2htgYw
Hvpu9uA/lvQZapbiFLd6UC+qUbVWZ3y22tGN2E+IL8nlGyH+eNb71UxbsDfD
sQl0gq6U51TuxVyv2gntxjdyLoCrcOwo9P2uy3jP6l2aS/upUp+1dky79iXh
vor5g//umNen9/EqvwndxkdmPJv2GlWrNBqg9nliZvCvwT8PvteBz0o9TGof
A98nfRvB/o7/kvqG5ym4kXXtxPcSvuHAd08xzwKfgfJJo2HdT+hcem/Fbs/6
/kqvU9gra7h14vvwP0b9TeQ6kPH/DP139OfuUzf7IO43rdvWTeg2IpXei3rq
gesuv08W+Q7chKc243rpP2QIvsuhayVNe0O/Cd2Gdl67/x8ugbk1
            "]], PolygonBox[CompressedData["
1:eJwtkcsuQ1EUhr+6pqL0iLpUaE0bTYQX8ABMRJtKjUTCiJFrvIB3Ee0IndBq
GBtVDbVTwtBIfCc9gy9rnb3//a9/77O4e7R52AdMyqC8ZaAlB+PwNwBt+3QC
uu6VZqAsO/I1Bp9ynoK6ujPr4zS8apKbdS2AhlSzUJEbqcbg2jPMwfIw9Fvb
at4lOwUZqeudH4In66meJ3IsYcZcqucZer/olxiBZ2vgvKRsm7UQh9sk1NTc
y0OUacH9YrRfsH7r/yN3aouulV3b8rsg+0EvQ8N+xZmrcjkPcefVovuE9wpz
h/l/1a2pv7K/iN4D32/JPi97epec0XRWLO1dpGuujnxIS3nTH9CZgPBochTW
zbsh//0hPDc=
            "]]}]}, 
        {Hue[0.5898969294636812], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtlE1I1GEQxp/yYy0317+Zrl/53+1WdCmyi0cpCKIP6BCUxGqHqIzoYCxd
OpgtYWUY1CFvRYegQ1gUQqTbwTC9JCUVRZSUEYKpVKd+w7yHZd7/vM/7zMwz
M5vJnTnYs1pSjl+J/dZJMxzyNdJwJC2skS7FUl/s537s7Q3S6CrpZ5XUDqYd
/I9WaS/n3ZyvgylvlP5AXKyWWuqkefBdKWkczDUwy2lpENwKnAPYDvzdldLp
rHSO2Cu8HeXtVL30pkz6Bn6aGFfBT2JTvLnPOYn9nnaMYZd4uwj/RerI8UsQ
twrMK+5mqO9f0vOwfKbgeZmBe620B+yLkNtzsJVJ1+MTmC74VS4dw77OOKdx
z3F3ixxOkvPOJulvqbSJWreDO8vjAnydKfdP4PtV5br1oV8xxB3PeA1Wy3rs
Fu4egu9ooBb47+D/jS3j7i7nfXB+aXXNTftm8tiRkKqJ/xn/EJiPpk+T+yPs
LN838LeBLw08JdjNIVYvdjnE2gVmPtRl9Y2DS5LnTWrcGvB57GLQeQE7G3m9
IlZbnfutD6ey3tMe7Pt6n6te/IfQYon+Pqn2+bA5eVTr3+bfZloFDS/DnWr0
tzab7YHf4m9EowP05WnkeZjf4h8m51nyP4Lt5k0Fmg+lfSYMYxw2WzZjc/jH
0t6juM57Yz0ahu847z/AcyXyebXZOIpvP9/38Cc4d4ZYFrM8dn8F9lnwD1L7
u6D/W5u32Hls1s6HWDYXD2p9Pm1OC0FP07U3aG7aPw76RNR9ocY1MW2i2PfO
9i8f/Kb3SMCb3hOhxgw1tgTdmht8Vmxmvra61hZ3EWx3qL0L25/1XbCdsNjG
adwDYX8L3BfTnqfN72TY0+mM1286jMTee8vNcj+R9b5Yf8bC3pk2prtpYv8x
1g/L2XbrP+j6uyo=
            "]], PolygonBox[CompressedData["
1:eJwtk01I03EYx5+tnBk63dL11yXTdcwu1TGoS2/0cuhQF2cWRcokiy4R1TW6
9AK9HQrqZmBohFFgkG1k0Is45iEKCh1WM6IipAKlz5dnhw88++/5Pc/3eWs/
1L/3WNjMtsBSGGkze1djVrvcLId9rs7sLJTjZnNQWGk2CVnsPsgFZqMhsyEe
57Gvpf3tpSVmz2Nmm/m2CVqIkYTqWrMIJBNmq+B1o9krmCFmCS6Tcxtv59Fw
BTsK1cQf4Hc99j/eTqFzHtEnyZ9p81zKmccupcyu4ruRb9PYTxrMHsMQOYbh
JYzDWBR98JkYs3GvUbVOtJtdrPGcb7AXm80W4DCxjqQ8hmKN8PYR/KK2E+T6
jZ7vgWuQFvWwC3sRvQtwgFjd8A2fOQglzcJwlx7dgSKxp2Bd4LEUc33gOZSr
h/96oY83WdiJ1l2aTavZGRgm1wNYS087Eu4j3zFqf9bgNav2C2nvLeHtPHYW
bvJ7GfX2pn0GmkUO33wF2Z3kzkAJTTOVGlTLfr7tgx/YP2FFm89KM4xhf0x5
Ls3kE/aGJuqCF/iOB95T9Tbcgl+Lz0Sz0U5oN2YDn3WxyuwLdg+9OhrzGIr1
NeWzVg1l7LdQDvkMJ7CPM9v+uO+AdkE9U+/e898HON3ku6sdPoUdZVZ1MM2b
mbhrkjb1UL1cTW//6lAiZlUx95HvbnZkD2TQ2AkDfLtXuZFsRYO0PKSmP2Hf
4cFGn6lmqx3Trt2n9sGo35hu7Qaxrge+I9qVAr6TKdcorbpJ3eZ23u5o9hvT
rUmDtGinipU3hcoMNUvtpHbzKTlGYQ1vO+A2O3Mr6TmVWzWpNt2IbmUr9sGI
97g14Tun3ZNmae8OvDfqUVe92X+wibPj
            "]], PolygonBox[CompressedData["
1:eJwtkjksRFEUhn/MwtjmSawzZlEySloKETSWgkbsQsGInhKFQiJKdIRKJyFE
Ms9SqUgQ06FiLDESOt/LfcWXc+855571xsfm+pK5kmLghZG4NAxD8IvBVyM1
W9J6gXQflRIVUiPsl0l74MUmnzReJU2HpClYIdgH/tvYEtVSA5xVSmt5ko1u
2bUvISPco/BB7HdI1kkThVIbOpt7CvLx28W/x/V13nyj30L3g8wEpTcYxy+N
bhJpU/9LQLqIm5qc2rp5t4PdEzNxnfgb1J2fw9tiaROfLZh1a5hB3tDjLbTR
w4FHqi+n3SLJD2HmEIIA51Fm0I7PILEfyHGMXKiVFuGLHJ9wRP5e/Grxs8jT
5CcGeVuwtUKcWH/kSHGewnfaMrmdGvJipnYv8h17lt0c0nM/PQzAqmV6n8Ae
IHahi3MOurlKkVe8vYTXEumEvm3Oad4/Qlexmdm5Mzv0t3yIa/b2xPkZ/O4e
fDEzb2fu7ZbZQ9bdn7PHTvrrgLuo+TcPyFxy54Bgnn+QIV642swjgjwhzyn8
A1wpXtI=
            "]]}]}, 
        {Hue[0.6111624602317655], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtk01IVGEUhg+WTWnOeCeyK9fh3ju7IILI1VBNoUmLoDL6WThJSTH2T+2C
CcoosxZa1CIqgpRSaNGiRVGrGWgRafSziejXFlpaiZHLnsP5Fh/n3HPPec/7
ved88b5j7UerRKTAmcfp80RO4DwNRHL4VxeJ9EQiv0KRPPE2Ymc5uQUis77I
ncDiG4mN+xb/jt3O9wi1aWrbGkXm5os0NYhU8z1B/tu0yIGsyGSNyGgs8hr8
AfLfYV/GFh+LDW8N5zg1A9TOkdOPfUTfTcQeY8v0W0nOc2yZvjvwV9Azj13r
ahUj7/yZ0DicrBPZFVrONLV/8ZP4IRirPOOgHBOLRTqJt4JZDq3vFv7nOdfh
843YLfwS8UH4bMDvqhU5SG0Rrv+qRX7Xi7wir5/81fwvcnaTH6NJxfHXe9x2
OEVwqgLj/ZO4F5meS7BfwLmGv47c5qWGo3iV2Ob1gf995P3B740MSzHL/P8a
Gudx7GeH8wnb7Jn+b/BzqgWc91J7JjJNeoiVMiItC0U6iF1xs7jn2a7ozlz2
LE/zRwKbsep8BB0eJK32ofLyTXPV/klgvbTnoON5E5xZen3Ev5u2Gq3V/tOu
dga7P7LaKbR9tsxm28SMOom/h9s5cKZ801C1rLh4IbIZK8/z+JPwuEF8AnvK
3fE0NuXuVYvtSNkOL2dew2njVgD7hW9x/f/D4bSAnQJ3GD8ZWb3iXCKeabB8
fRNdvuEoXqtn70jfWabR7qg6XUC7Ert0EdsNzs4EemI315l/GH+rZzupu9md
td07lDVdVJ9EZPurfXVXhhx/1XjM7eQodr1vu+qBed+9a33f+k50jjXg1Lt7
tdNzj9NTdR3yjGcvfbc5PvpGC+6OARj/AVGPqC4=
            "]], PolygonBox[CompressedData["
1:eJwtlF1ojnEYxu/sK7O927Pefbw2ve+7U7aSRS3iYITkq8iJfWVr08Z8nCIp
Fg4IcWArBwpRRLRlB/YRsy+RA5ITw2ZTLIuoze/qfg6uev73//687uv/JOsP
7jywwMx2gVQwVGj2EvzNMvsHgmKz32lmh1PMcviuyTGrBoNF+IE72CLpZmu5
v8V3SYHZHxLVYMsg/lTC7NJCs2PcdwRmpxPur3Nn4DVU60ie2VGwAtsF/OsX
mTWVmrXj/5PzRVDB3frAa02CmTg9ERsBn4gdBxH8b+M7lUmObLN7UbO7UZ9J
s53AdhxM4TsN6pJmtSB9Mf2C3lyzZ+AFMYNR70m9PcXWA37kOh8fqX8T+1c4
+AImwCQozvY7+azj/IgcD8Me1MsbengNWohtBQPk6891H/luCOcTR7PM18x5
T4pzOkS+B/jcB48jZk/AZ3KNg35sA2AeLuayfCbN9pyY8nTPUZFv1kjOBpDC
rKlghJjhqOdQrkP01Aa66KkbZCac641gB71MaOY851Bctpb6vXqu4r4v6bvV
zvv5XhZDW9Rvw9ZT6DvRbr6BEe7fxn232vEN4l8l/V47zE045+JeHItr7Vi7
3krebaAk5rnXUGMJ38Nx1440NKZZqbcPXCb2ChhNem3VUK33+LwDK6m9Ckzj
s5pclWCc7zOB59cMZTHXjLSzie/N6iFwbsRBGv2eD/ytaP9NnOvIUVvkb0Zv
p5M30gGuYrsW9qTeZNNdBjGzaZ5ze+A71W730mN13DUqrUoz0k5XsfsqprvY
34zm14zLA9ektDkK92OFrhlpp5lc+8E8M8zFXBONoU13sulOGm0JNSFtjIX8
qcZw2JN6k+akPWlK2tIb0lvqo1ZvxDUmrV0PXB/S98mE71C7lKakrV9Fzr04
F/d1IR/i9CzncyG/sjVwtzTftS2N9xPbrveT7jv8zrkVTnZnuB4rA9+Zdqed
a/czRa4dxShWmpf29cb01qQJaaOM/1p5gf8T9G/QTJqtKub/OvWgXj7EvZZq
bkF3/wHzQ9rT
            "]], PolygonBox[CompressedData["
1:eJwtkssrhFEYxp/cZS59o1xi8o2dxfgD5JKsWRAh92HhEnvFQsqlaEa5ZCdJ
lL/CisWQ2Sn3W1hZ0Cz9Tucsfj3nnPc57/e8py82Ntc5myOpGvLhr0L6hUFf
ui2WhtGpWilRIk2i40FpAlZZL3C2gpYEpABclUtpeON+Q4G05EmLUamtSDoL
STfUMrBJzw1Ycz2O8PWz74MB3/rnubfs2QxDrmY89zXSHbzCDrUWz37bZHjg
bJuzJ7SuTMrmSVE0ESY3xCulbnKde3ZGM+slXEAMX28uM3rWa+6k6ZOk3zX6
4r73jDbiaYIIeU4589B29h2wR69dOGD9Q22dWhACUOr8XdQOI8zC9xJ4R2AU
MvROUb9BQ8wThnpyxWGmSuopJB96zP0svpR7R/OezZ6d/dG9j3knk8fkSvrW
v+Xb3Cb/J/V9zr7RTvYnrMMup8nb5tn6F/V3+HCY9bT7H1rx/ANkw1W2
            "]]}]}, 
        {Hue[0.6324279909998491], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtk09IVGEUxS8lhTmTvUH0xUPmPVe1iMhWElomLWqRZO2roWxyYbuWWhYV
EgmCkKEJRk61FvoHbaJFhWVFLYqCKFH7R1bYpkW/y/kWH9+Z8+6f8517Jyud
6OpdYWadnJWcfGq2G9AVmV0CD4Ar4OecEfBc0WwYvnGV2V64r/xuALeCB+B/
VJud5X6QqM7rzGyemDZwBzHjkWLOEDMB7oOvAw9y6qlzOTb7VjBbgu/Pm22o
N/tXZfa30ewGNXtXm93iXqBmD3gC/JtvLcQ3U+96JM2ufSiVZtfeHkmDaxkE
v0PDYb7P1NGT+g/Xmk0lirnGfShVTIl703p4tJ0nb0ukXuUmsw/UagW3wY3G
0t8CfgtfAu8h7yn8ZvBx+NlM733G/SaTh5Ox3uy5VxMdxyNwH4vSn8uZHamV
Dxvx42Umz68Q84WzDXyO+gvBt076zhYV73kHU+lfJnYxxM/H0uTansTq4b0u
NOn97sNOvt9O5Oc092nqfMeTMfgdkd4+mWj2rucTPbcH3r1xj9yrrXD3iDvJ
vO4m8tH1/KHvqVCzn3uuQbPwmVTzuwJfk2o2zj+GPxBpr3y//P3et5IEHfAv
8GZfpNw15O4P8b7Xv9A0Br8LrjanGb2CWwr8T+5HYR9ci/vlOn3+Pief1x36
HM1r93p43zHqvie3O9W+uv8+h+ng2xS9uvPa25uJZuMxnwv6/3jNArnlUOci
3P3gVZm85bDbvuMzRe2P/2/WpcK+U/8BfAaQCQ==
            "]], PolygonBox[CompressedData["
1:eJwtk7lrVGEUxQ8aE8XR5A0hoxmGN5M/QHHDjbhWWkZBUFBnwARHZkTRRiFC
VIiVIAS0stDESkFREhQthAjiFtdeVBBiYcClMBB/h/uKA+/77nbOud+r1I73
NedJ6gUtYEcibZkv1duk76m0MzsXWqVpzmdL0hkwCM6BMeJDxEfA5XLcOfa+
IH0Aa4hvJDZL8ynqO8kZ5LwL7CU23BO17jHK+VbWr8S8K+TOdEg/wWieWWBk
mdTVGvyOLJFqnKvgULt0GHxJg2svPbbSa4D+1cUx8xWx/uxsTquIn6bnKfCY
GU/Ayi5pBThaZAbYQM76JO4cy5eDm/nvSUKjtTbo0QTP6DEJ7ndKD0C9J7ja
w+3WVwx+Po/xfYl+w2AtsXWgL4ne5ttRDs3W/gtPf4N79LwLxpdKE2D3cjyg
3wz5P8j7WIl6c/zE903ubuTDI3tlTdbWAE2wsFtq6w7O5j6bk/7lwhN7cwAO
+8uxc+9e5M4xsx8vB9LQaK23wR3wNR9czKmdPs+5u8ru9y2SntL/YBrfvpsk
dhG9F5KY4VnWZG118o6Bt5XYpT17x/dLvH5RCI7mak/sjTVa60QxtPsNjReD
k7m5xrXmbO4t6FgATlJzAjyE2yNQY0a1Ep7Ym7+leLt+L39KseNGVuNa8Qbn
clHj2uvF2Lff6DX8Xp29f785v0XP8Czv0Lu0Rmu1p/b2dSV273y/1Wa2q030
2Qy+pfG/2JNtnKfQ9AYM8X3e/2oSMed8Jvc/2PeOjA==
            "]], PolygonBox[CompressedData["
1:eJwtkr0vg1EUh38RJfWRepcqlfS1MVkI2sRmMrFY0OpQnWogVrQlNP6ESkiI
j53ERw0mYSCxEbOQkBajhOfm3uHJOe859/zuOee+3en5iVydpC4IwH5U2oOy
J30EpRVfWsdPNEhvEem+XXqAb/wRYknyRfJrUCRWgGPqc41SplU6cv4hdgd2
YZizYWpL1G7AptGAT+7b9uz9po9UCH24RbOP8zfYQKdUD9dt0iTnkzFprENK
k3/CH6R+CNLoPZMv4V+iVYEMsRdiWWyV+hpUqSkT+8Iu0O8iJKiJQ8H1lMcW
+M7Dj5vbzN9M/ID8OPET9E/dfGbOUc/q1tAdwO+Hx5jt0/Rr+jF9bXm2pzm0
sty9xK7OicfRT0SsptE+i9rcRdTGTX7WzZjy7W7Mju6wU+xsOmR3Y3Y0g/1r
4XHdfGbOJtd7ELvs27de9e37mXc09UanNyz91ks92Cv2VYHXiP0f3rH/fVBX
kg==
            "]]}]}, 
        {Hue[0.6666666666666666], EdgeForm[None], 
         GraphicsGroupBox[{PolygonBox[CompressedData["
1:eJwtUr9LW2EUPdqqiTXq06CpIeTFqZsgFKxZxKWDm3Qr0pDBSK3xB4pDB0Vt
oVMmKU6lUCMidBD8AaUdxUWoov4HgojQSkGXDp7jecPjfu9+555z7r1frjg5
XK4F8JLfI377zcDqY2A7CRRTwGUN8K0NeBUAW3EgGQIVxr/8UixY4n+eMc/7
ui7goB4oZYH1NPCuAVjh/SzjHfHtNa7bimoviVvjeTAwVmdxjbRY9zBlXuXK
5PvdCUzy/DHwnTAFYj8Ezv9j7itx4+TaZJyj71Pm/zcBz4np5/kT/ZS63UMv
c1Mxn+XnivVndcCvViAe2u9sAohFfRVz9Jiyny/kf5s2Z0+HteVhmZw/mZ+n
h2Lo+oe+2Wu1zTo35L/J2qf8Lkf+1R8S1nrD++9J72Inad/SekFsKTS/dORJ
eNUNPTVGvVZCz7waWE+6o6F384BnTyv0HKe3BeZnolmVGfuiWYlvgOfP5Llg
3W7au3xCfIFfE2vz5FgMvT/t/HXoXrQTzUU84nvW4X1pt3vaDfH7jBMNrpWP
2wwwzX3cZXwvLWn8iHSlP5owVt71jjQH9VaI3oze7FHWO9We32fsR77kVXxj
Cfek+Ws3p53e+wKxJ5zndSNwnPMONCu9a2GVl7Y0/zSaS371hqR9nnP+jLEa
9bbBeA+CNngz
            "]], PolygonBox[CompressedData["
1:eJwtUk0rhGEUPWN8zOsr75iYvMn77iys7LCRnyAbO81iyDA+IgsLkmxnJbFR
QyMpC5GpqVnOiuRj/AMlKSRsLJzjvoun7vOce849994nSM2NZmsA9PHU8pwl
gG0G93VAqQ0oe8BKA3DiAGMusNYNVInNRYFVxpkeYNwxTrGVAl1Apd7ehH0y
Zz4GLPB8M77qNG3ln7LWT7dhzxGgt8NqCn+g/mIc+Ar5Sd4LvO/TzxDjXeo/
U79ATz+Ml+jxnNhh3LTEEVdvwpZ5LhnvJQGH+GsjcBcAt4HFGeJ54iOuac/w
fsB7wrfe33n2ieXJbyb/jZzHwN6E5Xiu6ScbN++a0QN77XcNkx/NotwWYsxZ
Zu47Oe0Rq//B+Ma1u3rKsfaab37lZ53xlmuzl8YLvTyRs+MYR9ypFvOnnkv0
Xw3Mq3aoXQ4wZzAazpD8Jt9yxXcYFz2blTTU67Fn3uQhTe3fZvOuHWmXm755
k94G4yPmz4b5mvVF+J/0HyrsPRvuTx6mPZu59NXDML2lfPOq+hOM077tXm+T
vu1E9VSj4Jnmvzb/XIx/7w9D1m2t
            "]]}]}}], 
      {Thickness[Small], Arrowheads[0.02], 
       ArrowBox[{{1.3333333333333335`, -2.}, {
        1.3333334177703715`, -2.2033848941849574`}}], 
       ArrowBox[{{1.3333333333333335`, -1.84}, {
        1.3333326460158443`, -1.816860205705308}}], 
       ArrowBox[{{1.3333333333333335`, -1.68}, {
        1.333332495717917, -1.3306460756923257`}}], 
       ArrowBox[{{1.3333333333333335`, -1.52}, {
        1.3333335224722986`, -1.3221814292348415`}}], 
       ArrowBox[{{1.3333333333333335`, -1.3599999999999999`}, {
        1.3333301770768542`, -1.3505510389927273`}}], 
       ArrowBox[{{1.3333333333333335`, -1.2}, {
        1.3333395478993282`, -1.1326707098732938`}}], 
       ArrowBox[{{1.3333333333333335`, -1.04}, {
        1.3333161216875136`, -1.1506642428261507`}}], 
       ArrowBox[{{1.3333333333333335`, -0.8799999999999999}, {
        1.3333325767774733`, -0.7206921140160181}}], 
       ArrowBox[{{1.3333333333333335`, -0.72}, {
        1.3333577862995298`, -0.7047815121104066}}], 
       ArrowBox[{{1.3333333333333335`, -0.56}, {
        1.3332958297785482`, -0.5098976462719216}}], 
       ArrowBox[{{1.3333333333333335`, -0.3999999999999999}, {
        1.3333360353185486`, -0.3918673257075462}}], 
       ArrowBox[{{1.3333333333333335`, -0.24}, {
        1.3333363595567744`, -0.28362070756861585`}}], 
       ArrowBox[{{1.3333333333333335`, -0.08000000000000007}, {
        1.3333605693443014`, -0.08778682018492483}}], 
       ArrowBox[{{1.3333333333333335`, 0.08000000000000007}, {
        1.3333605693443014`, 0.08778682018492483}}], 
       ArrowBox[{{1.3333333333333335`, 0.2400000000000002}, {
        1.3333363595567744`, 0.2836207075686162}}], 
       ArrowBox[{{1.3333333333333335`, 0.3999999999999999}, {
        1.3333360353185486`, 0.3918673257075462}}], 
       ArrowBox[{{1.3333333333333335`, 0.56}, {1.3332958297785482`, 
        0.5098976462719216}}], 
       ArrowBox[{{1.3333333333333335`, 0.7200000000000002}, {
        1.3333577862995298`, 0.7047815121104065}}], 
       ArrowBox[{{1.3333333333333335`, 0.8799999999999999}, {
        1.3333325767774733`, 0.7206921140160181}}], 
       ArrowBox[{{1.3333333333333335`, 1.04}, {1.3333161216875136`, 
        1.1506642428261507`}}], 
       ArrowBox[{{1.3333333333333335`, 1.2000000000000002`}, {
        1.3333395478993282`, 1.132670709873294}}], 
       ArrowBox[{{1.3333333333333335`, 1.3599999999999999`}, {
        1.3333301770768542`, 1.3505510389927273`}}], 
       ArrowBox[{{1.3333333333333335`, 1.52}, {1.3333335224722986`, 
        1.3221814292348415`}}], 
       ArrowBox[{{1.3333333333333335`, 1.6800000000000002`}, {
        1.333332495717917, 1.330646075692326}}], 
       ArrowBox[{{1.3333333333333335`, 1.8399999999999999`}, {
        1.3333326460158443`, 1.8168602057053085`}}], 
       ArrowBox[{{1.3333333333333335`, 2.}, {1.3333334177703715`, 
        2.2033848941849574`}}], 
       ArrowBox[{{1.4933333333333334`, -2.}, {
        1.493333128694967, -2.236452778199067}}], 
       ArrowBox[{{1.4933333333333334`, -1.84}, {
        1.493335564879789, -1.8058780527020932`}}], 
       ArrowBox[{{1.4933333333333334`, -1.68}, {
        1.4933352956445438`, -1.581809058740358}}], 
       ArrowBox[{{1.4933333333333334`, -1.52}, {
        1.4933346303436075`, -1.5652820623942045`}}], 
       ArrowBox[{{1.4933333333333334`, -1.3599999999999999`}, {
        1.493338883972518, -1.3094108338045816`}}], 
       ArrowBox[{{1.4933333333333334`, -1.2}, {
        1.493312710764301, -1.204561559841023}}], 
       ArrowBox[{{1.4933333333333334`, -1.04}, {
        1.4933459932518736`, -1.0572392031673363`}}], 
       ArrowBox[{{1.4933333333333334`, -0.8799999999999999}, {
        1.4933538137890476`, -0.893013665701733}}], 
       ArrowBox[{{1.4933333333333334`, -0.72}, {
        1.493311054362233, -0.7233485196721855}}], 
       ArrowBox[{{1.4933333333333334`, -0.56}, {
        1.493260658962341, -0.5139158138087041}}], 
       ArrowBox[{{1.4933333333333334`, -0.3999999999999999}, {
        1.493175133801612, -0.4439357897476914}}], 
       ArrowBox[{{1.4933333333333334`, -0.24}, {
        1.4933259990942764`, -0.2552841666486602}}], 
       ArrowBox[{{1.4933333333333334`, -0.08000000000000007}, {
        1.4933604822885584`, -0.07003729436197102}}], 
       ArrowBox[{{1.4933333333333334`, 0.08000000000000007}, {
        1.4933604822885584`, 0.07003729436197102}}], 
       ArrowBox[{{1.4933333333333334`, 0.2400000000000002}, {
        1.4933259990942764`, 0.25528416664866044`}}], 
       ArrowBox[{{1.4933333333333334`, 0.3999999999999999}, {
        1.493175133801612, 0.4439357897476914}}], 
       ArrowBox[{{1.4933333333333334`, 0.56}, {1.493260658962341, 
        0.5139158138087041}}], 
       ArrowBox[{{1.4933333333333334`, 0.7200000000000002}, {
        1.493311054362233, 0.7233485196721855}}], 
       ArrowBox[{{1.4933333333333334`, 0.8799999999999999}, {
        1.4933538137890476`, 0.893013665701733}}], 
       ArrowBox[{{1.4933333333333334`, 1.04}, {1.4933459932518736`, 
        1.0572392031673363`}}], 
       ArrowBox[{{1.4933333333333334`, 1.2000000000000002`}, {
        1.493312710764301, 1.2045615598410233`}}], 
       ArrowBox[{{1.4933333333333334`, 1.3599999999999999`}, {
        1.493338883972518, 1.3094108338045816`}}], 
       ArrowBox[{{1.4933333333333334`, 1.52}, {1.4933346303436075`, 
        1.5652820623942045`}}], 
       ArrowBox[{{1.4933333333333334`, 1.6800000000000002`}, {
        1.4933352956445438`, 1.581809058740358}}], 
       ArrowBox[{{1.4933333333333334`, 1.8399999999999999`}, {
        1.493335564879789, 1.8058780527020932`}}], 
       ArrowBox[{{1.4933333333333334`, 2.}, {1.493333128694967, 
        2.236452778199067}}], 
       ArrowBox[{{1.6533333333333335`, -2.}, {
        1.6533325506654923`, -2.205772396533014}}], 
       ArrowBox[{{1.6533333333333335`, -1.84}, {
        1.6533381718307487`, -1.6341276015982382`}}], 
       ArrowBox[{{1.6533333333333335`, -1.68}, {
        1.653331295742784, -1.5418004209795726`}}], 
       ArrowBox[{{1.6533333333333335`, -1.52}, {
        1.653330235202079, -1.5342303896001033`}}], 
       ArrowBox[{{1.6533333333333335`, -1.3599999999999999`}, {
        1.653332842627388, -1.483576249215207}}], 
       ArrowBox[{{1.6533333333333335`, -1.2}, {
        1.6533061697683633`, -1.118514378327372}}], 
       ArrowBox[{{1.6533333333333335`, -1.04}, {
        1.653338246884635, -1.1091821673747082`}}], 
       ArrowBox[{{1.6533333333333335`, -0.8799999999999999}, {
        1.6532308643257045`, -0.9178943918831466}}], 
       ArrowBox[{{1.6533333333333335`, -0.72}, {
        1.653312924564212, -0.6239766949989642}}], 
       ArrowBox[{{1.6533333333333335`, -0.56}, {
        1.6534378290263965`, -0.4943914859790676}}], 
       ArrowBox[{{1.6533333333333335`, -0.3999999999999999}, {
        1.6533759621182935`, -0.438914817312397}}], 
       ArrowBox[{{1.6533333333333335`, -0.24}, {
        1.653479628062801, -0.2770568651897707}}], 
       ArrowBox[{{1.6533333333333335`, -0.08000000000000007}, {
        1.6533402840519207`, -0.08632860214152566}}], 
       ArrowBox[{{1.6533333333333335`, 0.08000000000000007}, {
        1.6533402840519207`, 0.08632860214152566}}], 
       ArrowBox[{{1.6533333333333335`, 0.2400000000000002}, {
        1.653479628062801, 0.277056865189771}}], 
       ArrowBox[{{1.6533333333333335`, 0.3999999999999999}, {
        1.6533759621182935`, 0.438914817312397}}], 
       ArrowBox[{{1.6533333333333335`, 0.56}, {1.6534378290263965`, 
        0.4943914859790676}}], 
       ArrowBox[{{1.6533333333333335`, 0.7200000000000002}, {
        1.653312924564212, 0.6239766949989647}}], 
       ArrowBox[{{1.6533333333333335`, 0.8799999999999999}, {
        1.6532308643257045`, 0.9178943918831466}}], 
       ArrowBox[{{1.6533333333333335`, 1.04}, {1.653338246884635, 
        1.1091821673747082`}}], 
       ArrowBox[{{1.6533333333333335`, 1.2000000000000002`}, {
        1.6533061697683633`, 1.1185143783273728`}}], 
       ArrowBox[{{1.6533333333333335`, 1.3599999999999999`}, {
        1.653332842627388, 1.483576249215207}}], 
       ArrowBox[{{1.6533333333333335`, 1.52}, {1.653330235202079, 
        1.5342303896001033`}}], 
       ArrowBox[{{1.6533333333333335`, 1.6800000000000002`}, {
        1.653331295742784, 1.5418004209795724`}}], 
       ArrowBox[{{1.6533333333333335`, 1.8399999999999999`}, {
        1.6533381718307487`, 1.634127601598238}}], 
       ArrowBox[{{1.6533333333333335`, 2.}, {1.6533325506654923`, 
        2.205772396533014}}], 
       ArrowBox[{{1.8133333333333335`, -2.}, {
        1.8133350904184249`, -2.3999999999961408`}}], 
       ArrowBox[{{1.8133333333333335`, -1.84}, {
        1.8133282780397908`, -2.1274411488363087`}}], 
       ArrowBox[{{1.8133333333333335`, -1.68}, {
        1.8133358431319118`, -1.3276499798718735`}}], 
       ArrowBox[{{1.8133333333333335`, -1.52}, {
        1.8133316265325887`, -1.4992683628278165`}}], 
       ArrowBox[{{1.8133333333333335`, -1.3599999999999999`}, {
        1.813333735587042, -1.3040131142517428`}}], 
       ArrowBox[{{1.8133333333333335`, -1.2}, {
        1.813332224947909, -1.3651168587134406`}}], 
       ArrowBox[{{1.8133333333333335`, -1.04}, {
        1.8133438010715144`, -1.1231410932369226`}}], 
       ArrowBox[{{1.8133333333333335`, -0.8799999999999999}, {
        1.8133392003100814`, -0.8955113215865979}}], 
       ArrowBox[{{1.8133333333333335`, -0.72}, {
        1.8133796116897258`, -0.6599090055031969}}], 
       ArrowBox[{{1.8133333333333335`, -0.56}, {
        1.8132982182750723`, -0.47818323523287715`}}], 
       ArrowBox[{{1.8133333333333335`, -0.3999999999999999}, {
        1.813409590100761, -0.3796819218898752}}], 
       ArrowBox[{{1.8133333333333335`, -0.24}, {
        1.8132510045291947`, -0.25528743025849465`}}], 
       ArrowBox[{{1.8133333333333335`, -0.08000000000000007}, {
        1.8131239329592246`, -0.08810459286377526}}], 
       ArrowBox[{{1.8133333333333335`, 0.08000000000000007}, {
        1.8131239329592246`, 0.08810459286377526}}], 
       ArrowBox[{{1.8133333333333335`, 0.2400000000000002}, {
        1.8132510045291947`, 0.25528743025849493`}}], 
       ArrowBox[{{1.8133333333333335`, 0.3999999999999999}, {
        1.813409590100761, 0.3796819218898752}}], 
       ArrowBox[{{1.8133333333333335`, 0.56}, {1.8132982182750723`, 
        0.47818323523287715`}}], 
       ArrowBox[{{1.8133333333333335`, 0.7200000000000002}, {
        1.8133796116897258`, 0.6599090055031971}}], 
       ArrowBox[{{1.8133333333333335`, 0.8799999999999999}, {
        1.8133392003100814`, 0.8955113215865979}}], 
       ArrowBox[{{1.8133333333333335`, 1.04}, {1.8133438010715144`, 
        1.1231410932369226`}}], 
       ArrowBox[{{1.8133333333333335`, 1.2000000000000002`}, {
        1.813332224947909, 1.3651168587134401`}}], 
       ArrowBox[{{1.8133333333333335`, 1.3599999999999999`}, {
        1.813333735587042, 1.3040131142517428`}}], 
       ArrowBox[{{1.8133333333333335`, 1.52}, {1.8133316265325887`, 
        1.4992683628278165`}}], 
       ArrowBox[{{1.8133333333333335`, 1.6800000000000002`}, {
        1.8133358431319118`, 1.3276499798718733`}}], 
       ArrowBox[{{1.8133333333333335`, 1.8399999999999999`}, {
        1.8133282780397908`, 2.1274411488363087`}}], 
       ArrowBox[{{1.8133333333333335`, 2.}, {1.8133350904184249`, 
        2.3999999999961408`}}], 
       ArrowBox[{{1.9733333333333336`, -2.}, {
        1.9733313083764759`, -2.314198467787219}}], 
       ArrowBox[{{1.9733333333333336`, -1.84}, {
        1.973344434202818, -2.1384146872943357`}}], 
       ArrowBox[{{1.9733333333333336`, -1.68}, {
        1.9733156720015048`, -1.5594595619225549`}}], 
       ArrowBox[{{1.9733333333333336`, -1.52}, {
        1.9733221260959328`, -1.5973817472971126`}}], 
       ArrowBox[{{1.9733333333333336`, -1.3599999999999999`}, {
        1.9733469898404998`, -1.3455029728839523`}}], 
       ArrowBox[{{1.9733333333333336`, -1.2}, {
        1.9733317041387939`, -1.319953949503797}}], 
       ArrowBox[{{1.9733333333333336`, -1.04}, {
        1.973296707297637, -0.8983327677017419}}], 
       ArrowBox[{{1.9733333333333336`, -0.8799999999999999}, {
        1.9732032537225754`, -0.832759746594255}}], 
       ArrowBox[{{1.9733333333333336`, -0.72}, {
        1.9734106280418466`, -0.6801159880293908}}], 
       ArrowBox[{{1.9733333333333336`, -0.56}, {
        1.9735949432143771`, -0.48787405254901894`}}], 
       ArrowBox[{{1.9733333333333336`, -0.3999999999999999}, {
        1.9735985755072745`, -0.4118459502425017}}], 
       ArrowBox[{{1.9733333333333336`, -0.24}, {
        1.9735368750933509`, -0.24145784614610824`}}], 
       ArrowBox[{{1.9733333333333336`, -0.08000000000000007}, {
        1.9732471670188254`, -0.08577447756856203}}], 
       ArrowBox[{{1.9733333333333336`, 0.08000000000000007}, {
        1.9732471670188254`, 0.08577447756856203}}], 
       ArrowBox[{{1.9733333333333336`, 0.2400000000000002}, {
        1.9735368750933509`, 0.2414578461461085}}], 
       ArrowBox[{{1.9733333333333336`, 0.3999999999999999}, {
        1.9735985755072745`, 0.4118459502425017}}], 
       ArrowBox[{{1.9733333333333336`, 0.56}, {1.9735949432143771`, 
        0.48787405254901894`}}], 
       ArrowBox[{{1.9733333333333336`, 0.7200000000000002}, {
        1.9734106280418466`, 0.6801159880293911}}], 
       ArrowBox[{{1.9733333333333336`, 0.8799999999999999}, {
        1.9732032537225754`, 0.832759746594255}}], 
       ArrowBox[{{1.9733333333333336`, 1.04}, {1.973296707297637, 
        0.8983327677017419}}], 
       ArrowBox[{{1.9733333333333336`, 1.2000000000000002`}, {
        1.9733317041387939`, 1.3199539495037966`}}], 
       ArrowBox[{{1.9733333333333336`, 1.3599999999999999`}, {
        1.9733469898404998`, 1.3455029728839523`}}], 
       ArrowBox[{{1.9733333333333336`, 1.52}, {1.9733221260959328`, 
        1.5973817472971126`}}], 
       ArrowBox[{{1.9733333333333336`, 1.6800000000000002`}, {
        1.9733156720015048`, 1.5594595619225549`}}], 
       ArrowBox[{{1.9733333333333336`, 1.8399999999999999`}, {
        1.973344434202818, 2.1384146872943357`}}], 
       ArrowBox[{{1.9733333333333336`, 2.}, {1.9733313083764759`, 
        2.314198467787219}}], 
       ArrowBox[{{2.1333333333333337`, -2.}, {
        2.1333326112669315`, -2.0755686828647146`}}], 
       ArrowBox[{{2.1333333333333337`, -1.84}, {
        2.133333383089779, -2.021310808231901}}], 
       ArrowBox[{{2.1333333333333337`, -1.68}, {
        2.133331784215517, -1.9360749688787295`}}], 
       ArrowBox[{{2.1333333333333337`, -1.52}, {
        2.1333678283569886`, -1.5419628628050068`}}], 
       ArrowBox[{{2.1333333333333337`, -1.3599999999999999`}, {
        2.1333597366471415`, -1.2582570328605507`}}], 
       ArrowBox[{{2.1333333333333337`, -1.2}, {
        2.133301905551722, -1.2303002067043298`}}], 
       ArrowBox[{{2.1333333333333337`, -1.04}, {
        2.1333308703312577`, -0.8886812456819603}}], 
       ArrowBox[{{2.1333333333333337`, -0.8799999999999999}, {
        2.1333641369578484`, -0.7598940358910087}}], 
       ArrowBox[{{2.1333333333333337`, -0.72}, {
        2.1334316390229002`, -0.7396070376905975}}], 
       ArrowBox[{{2.1333333333333337`, -0.56}, {
        2.133360222252652, -0.4631122205404215}}], 
       ArrowBox[{{2.1333333333333337`, -0.3999999999999999}, {
        2.1336763215786623`, -0.403134222625591}}], 
       ArrowBox[{{2.1333333333333337`, -0.24}, {
        2.133706956183468, -0.22190704492065927`}}], 
       ArrowBox[{{2.1333333333333337`, -0.08000000000000007}, {
        2.132758497593226, -0.08353160390650695}}], 
       ArrowBox[{{2.1333333333333337`, 0.08000000000000007}, {
        2.132758497593226, 0.08353160390650695}}], 
       ArrowBox[{{2.1333333333333337`, 0.2400000000000002}, {
        2.133706956183468, 0.2219070449206595}}], 
       ArrowBox[{{2.1333333333333337`, 0.3999999999999999}, {
        2.1336763215786623`, 0.403134222625591}}], 
       ArrowBox[{{2.1333333333333337`, 0.56}, {2.133360222252652, 
        0.4631122205404215}}], 
       ArrowBox[{{2.1333333333333337`, 0.7200000000000002}, {
        2.1334316390229002`, 0.7396070376905974}}], 
       ArrowBox[{{2.1333333333333337`, 0.8799999999999999}, {
        2.1333641369578484`, 0.7598940358910087}}], 
       ArrowBox[{{2.1333333333333337`, 1.04}, {2.1333308703312577`, 
        0.8886812456819603}}], 
       ArrowBox[{{2.1333333333333337`, 1.2000000000000002`}, {
        2.133301905551722, 1.2303002067043296`}}], 
       ArrowBox[{{2.1333333333333337`, 1.3599999999999999`}, {
        2.1333597366471415`, 1.2582570328605507`}}], 
       ArrowBox[{{2.1333333333333337`, 1.52}, {2.1333678283569886`, 
        1.5419628628050068`}}], 
       ArrowBox[{{2.1333333333333337`, 1.6800000000000002`}, {
        2.133331784215517, 1.9360749688787302`}}], 
       ArrowBox[{{2.1333333333333337`, 1.8399999999999999`}, {
        2.133333383089779, 2.021310808231902}}], 
       ArrowBox[{{2.1333333333333337`, 2.}, {2.1333326112669315`, 
        2.0755686828647146`}}], 
       ArrowBox[{{2.2933333333333334`, -2.}, {
        2.2933317748752526`, -2.117558068650769}}], 
       ArrowBox[{{2.2933333333333334`, -1.84}, {
        2.293351398293115, -1.928721866144759}}], 
       ArrowBox[{{2.2933333333333334`, -1.68}, {
        2.2933844289448877`, -1.7026271715800734`}}], 
       ArrowBox[{{2.2933333333333334`, -1.52}, {
        2.293268477861274, -1.4425228865826585`}}], 
       ArrowBox[{{2.2933333333333334`, -1.3599999999999999`}, {
        2.293323210366052, -1.4198065848847878`}}], 
       ArrowBox[{{2.2933333333333334`, -1.2}, {
        2.2933439727306717`, -1.193283038334227}}], 
       ArrowBox[{{2.2933333333333334`, -1.04}, {
        2.2933474728908987`, -0.9863634035683668}}], 
       ArrowBox[{{2.2933333333333334`, -0.8799999999999999}, {
        2.2933219108046714`, -0.9016389947629178}}], 
       ArrowBox[{{2.2933333333333334`, -0.72}, {
        2.293338968068433, -0.7056787950658077}}], 
       ArrowBox[{{2.2933333333333334`, -0.56}, {
        2.2936574403911782`, -0.5757005991596725}}], 
       ArrowBox[{{2.2933333333333334`, -0.3999999999999999}, {
        2.29376618809697, -0.37742469575346416`}}], 
       ArrowBox[{{2.2933333333333334`, -0.24}, {
        2.2937130287755427`, -0.24746369628193143`}}], 
       ArrowBox[{{2.2933333333333334`, -0.08000000000000007}, {
        2.29325344858893, -0.07934530653454287}}], 
       ArrowBox[{{2.2933333333333334`, 0.08000000000000007}, {
        2.29325344858893, 0.07934530653454287}}], 
       ArrowBox[{{2.2933333333333334`, 0.2400000000000002}, {
        2.2937130287755427`, 0.24746369628193166`}}], 
       ArrowBox[{{2.2933333333333334`, 0.3999999999999999}, {2.29376618809697,
         0.37742469575346416`}}], 
       ArrowBox[{{2.2933333333333334`, 0.56}, {2.2936574403911782`, 
        0.5757005991596725}}], 
       ArrowBox[{{2.2933333333333334`, 0.7200000000000002}, {
        2.293338968068433, 0.705678795065808}}], 
       ArrowBox[{{2.2933333333333334`, 0.8799999999999999}, {
        2.2933219108046714`, 0.9016389947629178}}], 
       ArrowBox[{{2.2933333333333334`, 1.04}, {2.2933474728908987`, 
        0.9863634035683668}}], 
       ArrowBox[{{2.2933333333333334`, 1.2000000000000002`}, {
        2.2933439727306717`, 1.1932830383342272`}}], 
       ArrowBox[{{2.2933333333333334`, 1.3599999999999999`}, {
        2.293323210366052, 1.4198065848847878`}}], 
       ArrowBox[{{2.2933333333333334`, 1.52}, {2.293268477861274, 
        1.4425228865826585`}}], 
       ArrowBox[{{2.2933333333333334`, 1.6800000000000002`}, {
        2.2933844289448877`, 1.7026271715800738`}}], 
       ArrowBox[{{2.2933333333333334`, 1.8399999999999999`}, {
        2.293351398293115, 1.9287218661447592`}}], 
       ArrowBox[{{2.2933333333333334`, 2.}, {2.2933317748752526`, 
        2.117558068650769}}], 
       ArrowBox[{{2.4533333333333336`, -2.}, {
        2.453335540205729, -2.253694350819859}}], 
       ArrowBox[{{2.4533333333333336`, -1.84}, {
        2.4533478154588937`, -1.7762179503773805`}}], 
       ArrowBox[{{2.4533333333333336`, -1.68}, {
        2.453371960654236, -1.692055464150311}}], 
       ArrowBox[{{2.4533333333333336`, -1.52}, {
        2.4533153647839194`, -1.470947096645735}}], 
       ArrowBox[{{2.4533333333333336`, -1.3599999999999999`}, {
        2.453235924288543, -1.3599621011304281`}}], 
       ArrowBox[{{2.4533333333333336`, -1.2}, {
        2.4533087338680812`, -1.2050136069246373`}}], 
       ArrowBox[{{2.4533333333333336`, -1.04}, {
        2.45324218622229, -0.9093204346261738}}], 
       ArrowBox[{{2.4533333333333336`, -0.8799999999999999}, {
        2.4532960113859748`, -0.8140152544359742}}], 
       ArrowBox[{{2.4533333333333336`, -0.72}, {
        2.453345431089584, -0.7221051990744648}}], 
       ArrowBox[{{2.4533333333333336`, -0.56}, {
        2.4535060796494332`, -0.5714914147202712}}], 
       ArrowBox[{{2.4533333333333336`, -0.3999999999999999}, {
        2.453472974507931, -0.41653087728539795`}}], 
       ArrowBox[{{2.4533333333333336`, -0.24}, {
        2.4530094284224018`, -0.2514607897479104}}], 
       ArrowBox[{{2.4533333333333336`, -0.08000000000000007}, {
        2.452686217595801, -0.08015129972642304}}], 
       ArrowBox[{{2.4533333333333336`, 0.08000000000000007}, {
        2.452686217595801, 0.08015129972642303}}], 
       ArrowBox[{{2.4533333333333336`, 0.2400000000000002}, {
        2.4530094284224018`, 0.2514607897479106}}], 
       ArrowBox[{{2.4533333333333336`, 0.3999999999999999}, {
        2.453472974507931, 0.41653087728539795`}}], 
       ArrowBox[{{2.4533333333333336`, 0.56}, {2.4535060796494332`, 
        0.5714914147202712}}], 
       ArrowBox[{{2.4533333333333336`, 0.7200000000000002}, {
        2.453345431089584, 0.722105199074465}}], 
       ArrowBox[{{2.4533333333333336`, 0.8799999999999999}, {
        2.4532960113859748`, 0.8140152544359742}}], 
       ArrowBox[{{2.4533333333333336`, 1.04}, {2.45324218622229, 
        0.9093204346261738}}], 
       ArrowBox[{{2.4533333333333336`, 1.2000000000000002`}, {
        2.4533087338680812`, 1.2050136069246375`}}], 
       ArrowBox[{{2.4533333333333336`, 1.3599999999999999`}, {
        2.453235924288543, 1.3599621011304281`}}], 
       ArrowBox[{{2.4533333333333336`, 1.52}, {2.4533153647839194`, 
        1.470947096645735}}], 
       ArrowBox[{{2.4533333333333336`, 1.6800000000000002`}, {
        2.453371960654236, 1.6920554641503114`}}], 
       ArrowBox[{{2.4533333333333336`, 1.8399999999999999`}, {
        2.4533478154588937`, 1.7762179503773798`}}], 
       ArrowBox[{{2.4533333333333336`, 2.}, {2.453335540205729, 
        2.253694350819859}}], 
       ArrowBox[{{2.6133333333333333`, -2.}, {
        2.613348826516908, -2.29251065748755}}], 
       ArrowBox[{{2.6133333333333333`, -1.84}, {
        2.613359710918376, -1.8436473839448246`}}], 
       ArrowBox[{{2.6133333333333333`, -1.68}, {
        2.613437888461967, -1.3362824035352023`}}], 
       ArrowBox[{{2.6133333333333333`, -1.52}, {
        2.613474068109757, -1.4733206270210866`}}], 
       ArrowBox[{{2.6133333333333333`, -1.3599999999999999`}, {
        2.613249617355362, -1.4130816445272982`}}], 
       ArrowBox[{{2.6133333333333333`, -1.2}, {
        2.6133537430468845`, -1.1959839594782262`}}], 
       ArrowBox[{{2.6133333333333333`, -1.04}, {
        2.613351091329742, -1.0890460516959717`}}], 
       ArrowBox[{{2.6133333333333333`, -0.8799999999999999}, {
        2.613344830516282, -0.8487203966112326}}], 
       ArrowBox[{{2.6133333333333333`, -0.72}, {
        2.613331938044415, -0.7152477272022489}}], 
       ArrowBox[{{2.6133333333333333`, -0.56}, {
        2.6133892334050417`, -0.565752499855468}}], 
       ArrowBox[{{2.6133333333333333`, -0.3999999999999999}, {
        2.613242744966758, -0.38464029044783626`}}], 
       ArrowBox[{{2.6133333333333333`, -0.24}, {
        2.6138269536026777`, -0.23739656076455654`}}], 
       ArrowBox[{{2.6133333333333333`, -0.08000000000000007}, {
        2.6147346420993207`, -0.07727413565751567}}], 
       ArrowBox[{{2.6133333333333333`, 0.08000000000000007}, {
        2.6147346420993207`, 0.07727413565751567}}], 
       ArrowBox[{{2.6133333333333333`, 0.2400000000000002}, {
        2.6138269536026777`, 0.23739656076455679`}}], 
       ArrowBox[{{2.6133333333333333`, 0.3999999999999999}, {
        2.613242744966758, 0.38464029044783626`}}], 
       ArrowBox[{{2.6133333333333333`, 0.56}, {2.6133892334050417`, 
        0.565752499855468}}], 
       ArrowBox[{{2.6133333333333333`, 0.7200000000000002}, {
        2.613331938044415, 0.7152477272022493}}], 
       ArrowBox[{{2.6133333333333333`, 0.8799999999999999}, {
        2.613344830516282, 0.8487203966112326}}], 
       ArrowBox[{{2.6133333333333333`, 1.04}, {2.613351091329742, 
        1.0890460516959717`}}], 
       ArrowBox[{{2.6133333333333333`, 1.2000000000000002`}, {
        2.6133537430468845`, 1.1959839594782262`}}], 
       ArrowBox[{{2.6133333333333333`, 1.3599999999999999`}, {
        2.613249617355362, 1.4130816445272985`}}], 
       ArrowBox[{{2.6133333333333333`, 1.52}, {2.613474068109757, 
        1.4733206270210866`}}], 
       ArrowBox[{{2.6133333333333333`, 1.6800000000000002`}, {
        2.613437888461967, 1.3362824035352021`}}], 
       ArrowBox[{{2.6133333333333333`, 1.8399999999999999`}, {
        2.613359710918376, 1.8436473839448237`}}], 
       ArrowBox[{{2.6133333333333333`, 2.}, {2.613348826516908, 
        2.29251065748755}}], 
       ArrowBox[{{2.7733333333333334`, -2.}, {
        2.773332968662523, -2.231612050170722}}], 
       ArrowBox[{{2.7733333333333334`, -1.84}, {
        2.773335529693528, -1.9961051516618338`}}], 
       ArrowBox[{{2.7733333333333334`, -1.68}, {
        2.7734755029632043`, -1.4616678792694602`}}], 
       ArrowBox[{{2.7733333333333334`, -1.52}, {
        2.7732569327695757`, -1.4396441067385681`}}], 
       ArrowBox[{{2.7733333333333334`, -1.3599999999999999`}, {
        2.7732935746732457`, -1.30428530186239}}], 
       ArrowBox[{{2.7733333333333334`, -1.2}, {
        2.7732069521399048`, -1.130687092564678}}], 
       ArrowBox[{{2.7733333333333334`, -1.04}, {
        2.773027648602377, -1.0821694980469394`}}], 
       ArrowBox[{{2.7733333333333334`, -0.8799999999999999}, {
        2.773102323971595, -0.9304289389651884}}], 
       ArrowBox[{{2.7733333333333334`, -0.72}, {
        2.773530849792396, -0.7356162653174555}}], 
       ArrowBox[{{2.7733333333333334`, -0.56}, {
        2.773326493644388, -0.6338426115615576}}], 
       ArrowBox[{{2.7733333333333334`, -0.3999999999999999}, {
        2.773191154490726, -0.3950845752771918}}], 
       ArrowBox[{{2.7733333333333334`, -0.24}, {
        2.7737179133054166`, -0.22837731020261093`}}], 
       ArrowBox[{{2.7733333333333334`, -0.08000000000000007}, {
        2.7749466922746144`, -0.08735161613230702}}], 
       ArrowBox[{{2.7733333333333334`, 0.08000000000000007}, {
        2.7749466922746144`, 0.08735161613230702}}], 
       ArrowBox[{{2.7733333333333334`, 0.2400000000000002}, {
        2.7737179133054166`, 0.22837731020261115`}}], 
       ArrowBox[{{2.7733333333333334`, 0.3999999999999999}, {
        2.773191154490726, 0.3950845752771918}}], 
       ArrowBox[{{2.7733333333333334`, 0.56}, {2.773326493644388, 
        0.6338426115615576}}], 
       ArrowBox[{{2.7733333333333334`, 0.7200000000000002}, {
        2.773530849792396, 0.7356162653174558}}], 
       ArrowBox[{{2.7733333333333334`, 0.8799999999999999}, {
        2.773102323971595, 0.9304289389651884}}], 
       ArrowBox[{{2.7733333333333334`, 1.04}, {2.773027648602377, 
        1.0821694980469394`}}], 
       ArrowBox[{{2.7733333333333334`, 1.2000000000000002`}, {
        2.7732069521399048`, 1.1306870925646784`}}], 
       ArrowBox[{{2.7733333333333334`, 1.3599999999999999`}, {
        2.7732935746732457`, 1.30428530186239}}], 
       ArrowBox[{{2.7733333333333334`, 1.52}, {2.7732569327695757`, 
        1.4396441067385681`}}], 
       ArrowBox[{{2.7733333333333334`, 1.6800000000000002`}, {
        2.7734755029632043`, 1.46166787926946}}], 
       ArrowBox[{{2.7733333333333334`, 1.8399999999999999`}, {
        2.773335529693528, 1.9961051516618333`}}], 
       ArrowBox[{{2.7733333333333334`, 2.}, {2.773332968662523, 
        2.231612050170722}}], 
       ArrowBox[{{2.9333333333333336`, -2.}, {
        2.933331431835537, -2.1513926378031045`}}], 
       ArrowBox[{{2.9333333333333336`, -1.84}, {
        2.933397456222273, -2.011905365278912}}], 
       ArrowBox[{{2.9333333333333336`, -1.68}, {
        2.9333757364647384`, -1.578745366279051}}], 
       ArrowBox[{{2.9333333333333336`, -1.52}, {
        2.9334403864556933`, -1.5807314417805827`}}], 
       ArrowBox[{{2.9333333333333336`, -1.3599999999999999`}, {
        2.933257823840857, -1.4400898325847713`}}], 
       ArrowBox[{{2.9333333333333336`, -1.2}, {
        2.9334053822255686`, -1.1608638074387774`}}], 
       ArrowBox[{{2.9333333333333336`, -1.04}, {
        2.9332213242807694`, -0.974080591894468}}], 
       ArrowBox[{{2.9333333333333336`, -0.8799999999999999}, {
        2.9334291448222762`, -0.9404828856053702}}], 
       ArrowBox[{{2.9333333333333336`, -0.72}, {
        2.933642422994795, -0.773355327575687}}], 
       ArrowBox[{{2.9333333333333336`, -0.56}, {
        2.9333289278427293`, -0.5413943782752982}}], 
       ArrowBox[{{2.9333333333333336`, -0.3999999999999999}, {
        2.93308753011735, -0.40996009036919673`}}], 
       ArrowBox[{{2.9333333333333336`, -0.24}, {
        2.932640541859625, -0.21916351670094408`}}], 
       ArrowBox[{{2.9333333333333336`, -0.08000000000000007}, {
        2.9327473283950476`, -0.0782081494824492}}], 
       ArrowBox[{{2.9333333333333336`, 0.08000000000000007}, {
        2.9327473283950476`, 0.0782081494824492}}], 
       ArrowBox[{{2.9333333333333336`, 0.2400000000000002}, {
        2.932640541859625, 0.21916351670094425`}}], 
       ArrowBox[{{2.9333333333333336`, 0.3999999999999999}, {2.93308753011735,
         0.40996009036919673`}}], 
       ArrowBox[{{2.9333333333333336`, 0.56}, {2.9333289278427293`, 
        0.5413943782752982}}], 
       ArrowBox[{{2.9333333333333336`, 0.7200000000000002}, {
        2.933642422994795, 0.7733553275756873}}], 
       ArrowBox[{{2.9333333333333336`, 0.8799999999999999}, {
        2.9334291448222762`, 0.9404828856053702}}], 
       ArrowBox[{{2.9333333333333336`, 1.04}, {2.9332213242807694`, 
        0.974080591894468}}], 
       ArrowBox[{{2.9333333333333336`, 1.2000000000000002`}, {
        2.9334053822255686`, 1.1608638074387778`}}], 
       ArrowBox[{{2.9333333333333336`, 1.3599999999999999`}, {
        2.933257823840857, 1.4400898325847713`}}], 
       ArrowBox[{{2.9333333333333336`, 1.52}, {2.9334403864556933`, 
        1.5807314417805827`}}], 
       ArrowBox[{{2.9333333333333336`, 1.6800000000000002`}, {
        2.9333757364647384`, 1.578745366279051}}], 
       ArrowBox[{{2.9333333333333336`, 1.8399999999999999`}, {
        2.933397456222273, 2.011905365278912}}], 
       ArrowBox[{{2.9333333333333336`, 2.}, {2.933331431835537, 
        2.151392637803105}}], 
       ArrowBox[{{3.0933333333333337`, -2.}, {
        3.0933582751262327`, -2.2042296953611644`}}], 
       ArrowBox[{{3.0933333333333337`, -1.84}, {
        3.093337123287291, -1.8375724897525905`}}], 
       ArrowBox[{{3.0933333333333337`, -1.68}, {
        3.0932528941206012`, -1.5382435127906722`}}], 
       ArrowBox[{{3.0933333333333337`, -1.52}, {
        3.09339787710866, -1.6072538725940138`}}], 
       ArrowBox[{{3.0933333333333337`, -1.3599999999999999`}, {
        3.093657165577441, -1.3344166949734395`}}], 
       ArrowBox[{{3.0933333333333337`, -1.2}, {
        3.0933487458528885`, -1.160237253183079}}], 
       ArrowBox[{{3.0933333333333337`, -1.04}, {
        3.093724383868881, -0.9861775504665632}}], 
       ArrowBox[{{3.0933333333333337`, -0.8799999999999999}, {
        3.0938839232900377`, -0.9195851634342939}}], 
       ArrowBox[{{3.0933333333333337`, -0.72}, {
        3.093452550542633, -0.7141915915043773}}], 
       ArrowBox[{{3.0933333333333337`, -0.56}, {
        3.0933426743335883`, -0.576854422724614}}], 
       ArrowBox[{{3.0933333333333337`, -0.3999999999999999}, {
        3.0932317057426744`, -0.3507612174838158}}], 
       ArrowBox[{{3.0933333333333337`, -0.24}, {
        3.0923220195320216`, -0.24566084793485424`}}], 
       ArrowBox[{{3.0933333333333337`, -0.08000000000000007}, {
        3.092374779815435, -0.08746985587861401}}], 
       ArrowBox[{{3.0933333333333337`, 0.08000000000000007}, {
        3.092374779815435, 0.08746985587861401}}], 
       ArrowBox[{{3.0933333333333337`, 0.2400000000000002}, {
        3.0923220195320216`, 0.24566084793485446`}}], 
       ArrowBox[{{3.0933333333333337`, 0.3999999999999999}, {
        3.0932317057426744`, 0.3507612174838158}}], 
       ArrowBox[{{3.0933333333333337`, 0.56}, {3.0933426743335883`, 
        0.576854422724614}}], 
       ArrowBox[{{3.0933333333333337`, 0.7200000000000002}, {
        3.093452550542633, 0.7141915915043775}}], 
       ArrowBox[{{3.0933333333333337`, 0.8799999999999999}, {
        3.0938839232900377`, 0.9195851634342939}}], 
       ArrowBox[{{3.0933333333333337`, 1.04}, {3.093724383868881, 
        0.9861775504665632}}], 
       ArrowBox[{{3.0933333333333337`, 1.2000000000000002`}, {
        3.0933487458528885`, 1.160237253183079}}], 
       ArrowBox[{{3.0933333333333337`, 1.3599999999999999`}, {
        3.093657165577441, 1.3344166949734395`}}], 
       ArrowBox[{{3.0933333333333337`, 1.52}, {3.09339787710866, 
        1.6072538725940138`}}], 
       ArrowBox[{{3.0933333333333337`, 1.6800000000000002`}, {
        3.0932528941206012`, 1.5382435127906722`}}], 
       ArrowBox[{{3.0933333333333337`, 1.8399999999999999`}, {
        3.093337123287291, 1.83757248975259}}], 
       ArrowBox[{{3.0933333333333337`, 2.}, {3.0933582751262327`, 
        2.2042296953611644`}}], 
       ArrowBox[{{3.2533333333333334`, -2.}, {
        3.253355516081454, -2.047745477140199}}], 
       ArrowBox[{{3.2533333333333334`, -1.84}, {
        3.2533039680702105`, -1.8676114539002315`}}], 
       ArrowBox[{{3.2533333333333334`, -1.68}, {
        3.2533035927201395`, -1.736864935839295}}], 
       ArrowBox[{{3.2533333333333334`, -1.52}, {
        3.253553756645331, -1.594457921815184}}], 
       ArrowBox[{{3.2533333333333334`, -1.3599999999999999`}, {
        3.2534561980779766`, -1.3188240112539202`}}], 
       ArrowBox[{{3.2533333333333334`, -1.2}, {
        3.252993130377904, -1.0843451455865452`}}], 
       ArrowBox[{{3.2533333333333334`, -1.04}, {
        3.2530395266816283`, -1.0200957711048353`}}], 
       ArrowBox[{{3.2533333333333334`, -0.8799999999999999}, {
        3.2536766762733604`, -0.8562294909497665}}], 
       ArrowBox[{{3.2533333333333334`, -0.72}, {
        3.2536454381940882`, -0.6962099984039397}}], 
       ArrowBox[{{3.2533333333333334`, -0.56}, {
        3.253303686267479, -0.530094806435699}}], 
       ArrowBox[{{3.2533333333333334`, -0.3999999999999999}, {
        3.252415086381474, -0.4243197659528935}}], 
       ArrowBox[{{3.2533333333333334`, -0.24}, {
        3.2528338301999127`, -0.23929413650603612`}}], 
       ArrowBox[{{3.2533333333333334`, -0.08000000000000007}, {
        3.2502214138416146`, -0.07404171645725297}}], 
       ArrowBox[{{3.2533333333333334`, 0.08000000000000007}, {
        3.2502214138416146`, 0.07404171645725297}}], 
       ArrowBox[{{3.2533333333333334`, 0.2400000000000002}, {
        3.2528338301999127`, 0.23929413650603634`}}], 
       ArrowBox[{{3.2533333333333334`, 0.3999999999999999}, {
        3.252415086381474, 0.4243197659528935}}], 
       ArrowBox[{{3.2533333333333334`, 0.56}, {3.253303686267479, 
        0.530094806435699}}], 
       ArrowBox[{{3.2533333333333334`, 0.7200000000000002}, {
        3.2536454381940882`, 0.6962099984039399}}], 
       ArrowBox[{{3.2533333333333334`, 0.8799999999999999}, {
        3.2536766762733604`, 0.8562294909497665}}], 
       ArrowBox[{{3.2533333333333334`, 1.04}, {3.2530395266816283`, 
        1.0200957711048353`}}], 
       ArrowBox[{{3.2533333333333334`, 1.2000000000000002`}, {
        3.252993130377904, 1.0843451455865454`}}], 
       ArrowBox[{{3.2533333333333334`, 1.3599999999999999`}, {
        3.2534561980779766`, 1.3188240112539202`}}], 
       ArrowBox[{{3.2533333333333334`, 1.52}, {3.253553756645331, 
        1.594457921815184}}], 
       ArrowBox[{{3.2533333333333334`, 1.6800000000000002`}, {
        3.2533035927201395`, 1.7368649358392951`}}], 
       ArrowBox[{{3.2533333333333334`, 1.8399999999999999`}, {
        3.2533039680702105`, 1.8676114539002318`}}], 
       ArrowBox[{{3.2533333333333334`, 2.}, {3.253355516081454, 
        2.047745477140199}}], 
       ArrowBox[{{3.4133333333333336`, -2.}, {
        3.413350092046707, -2.135342820853321}}], 
       ArrowBox[{{3.4133333333333336`, -1.84}, {
        3.4132507152225307`, -1.6466694361652305`}}], 
       ArrowBox[{{3.4133333333333336`, -1.68}, {
        3.4133258020446964`, -1.81880473901751}}], 
       ArrowBox[{{3.4133333333333336`, -1.52}, {
        3.4133201081645432`, -1.5070534571344787`}}], 
       ArrowBox[{{3.4133333333333336`, -1.3599999999999999`}, {
        3.4132059850185006`, -1.273554851267904}}], 
       ArrowBox[{{3.4133333333333336`, -1.2}, {
        3.4132158739487752`, -1.1042115139670476`}}], 
       ArrowBox[{{3.4133333333333336`, -1.04}, {
        3.413043957269361, -0.9644932330908643}}], 
       ArrowBox[{{3.4133333333333336`, -0.8799999999999999}, {
        3.4132158753787962`, -0.841994572183747}}], 
       ArrowBox[{{3.4133333333333336`, -0.72}, {
        3.413038483822708, -0.708240994855348}}], 
       ArrowBox[{{3.4133333333333336`, -0.56}, {
        3.4133417544418956`, -0.500523436459974}}], 
       ArrowBox[{{3.4133333333333336`, -0.3999999999999999}, {
        3.4123209421200227`, -0.4323924945791861}}], 
       ArrowBox[{{3.4133333333333336`, -0.24}, {
        3.412865534500042, -0.2418433822698873}}], 
       ArrowBox[{{3.4133333333333336`, -0.08000000000000007}, {
        3.413972581229239, -0.08022554153392959}}], 
       ArrowBox[{{3.4133333333333336`, 0.08000000000000007}, {
        3.413972581229239, 0.08022554153392959}}], 
       ArrowBox[{{3.4133333333333336`, 0.2400000000000002}, {
        3.412865534500042, 0.24184338226988755`}}], 
       ArrowBox[{{3.4133333333333336`, 0.3999999999999999}, {
        3.4123209421200227`, 0.4323924945791861}}], 
       ArrowBox[{{3.4133333333333336`, 0.56}, {3.4133417544418956`, 
        0.500523436459974}}], 
       ArrowBox[{{3.4133333333333336`, 0.7200000000000002}, {
        3.413038483822708, 0.7082409948553481}}], 
       ArrowBox[{{3.4133333333333336`, 0.8799999999999999}, {
        3.4132158753787962`, 0.841994572183747}}], 
       ArrowBox[{{3.4133333333333336`, 1.04}, {3.413043957269361, 
        0.9644932330908643}}], 
       ArrowBox[{{3.4133333333333336`, 1.2000000000000002`}, {
        3.4132158739487752`, 1.1042115139670479`}}], 
       ArrowBox[{{3.4133333333333336`, 1.3599999999999999`}, {
        3.4132059850185006`, 1.273554851267904}}], 
       ArrowBox[{{3.4133333333333336`, 1.52}, {3.4133201081645432`, 
        1.5070534571344787`}}], 
       ArrowBox[{{3.4133333333333336`, 1.6800000000000002`}, {
        3.4133258020446964`, 1.8188047390175104`}}], 
       ArrowBox[{{3.4133333333333336`, 1.8399999999999999`}, {
        3.4132507152225307`, 1.6466694361652299`}}], 
       ArrowBox[{{3.4133333333333336`, 2.}, {3.413350092046707, 
        2.135342820853321}}], 
       ArrowBox[{{3.5733333333333337`, -2.}, {
        3.5733070649080676`, -2.1567124701883436`}}], 
       ArrowBox[{{3.5733333333333337`, -1.84}, {
        3.573266169906881, -1.7140069087279741`}}], 
       ArrowBox[{{3.5733333333333337`, -1.68}, {
        3.573440101760454, -1.6824275936115727`}}], 
       ArrowBox[{{3.5733333333333337`, -1.52}, {
        3.57327565876171, -1.4973151275515024`}}], 
       ArrowBox[{{3.5733333333333337`, -1.3599999999999999`}, {
        3.573489132406508, -1.3545890918101344`}}], 
       ArrowBox[{{3.5733333333333337`, -1.2}, {
        3.5734978095136074`, -1.1918853225690675`}}], 
       ArrowBox[{{3.5733333333333337`, -1.04}, {
        3.5734142156426256`, -1.0465134344382676`}}], 
       ArrowBox[{{3.5733333333333337`, -0.8799999999999999}, {
        3.5731045968704964`, -0.870006570104264}}], 
       ArrowBox[{{3.5733333333333337`, -0.72}, {
        3.5733973945267197`, -0.7145848094732256}}], 
       ArrowBox[{{3.5733333333333337`, -0.56}, {
        3.5733250754858292`, -0.5086485324638715}}], 
       ArrowBox[{{3.5733333333333337`, -0.3999999999999999}, {
        3.57340186553216, -0.42278448943331}}], 
       ArrowBox[{{3.5733333333333337`, -0.24}, {
        3.5740526003005897`, -0.2416164768797011}}], 
       ArrowBox[{{3.5733333333333337`, -0.08000000000000007}, {
        3.5728746845200656`, -0.07456483693469215}}], 
       ArrowBox[{{3.5733333333333337`, 0.08000000000000007}, {
        3.5728746845200656`, 0.07456483693469215}}], 
       ArrowBox[{{3.5733333333333337`, 0.2400000000000002}, {
        3.5740526003005897`, 0.24161647687970136`}}], 
       ArrowBox[{{3.5733333333333337`, 0.3999999999999999}, {3.57340186553216,
         0.42278448943331}}], 
       ArrowBox[{{3.5733333333333337`, 0.56}, {3.5733250754858292`, 
        0.5086485324638715}}], 
       ArrowBox[{{3.5733333333333337`, 0.7200000000000002}, {
        3.5733973945267197`, 0.7145848094732258}}], 
       ArrowBox[{{3.5733333333333337`, 0.8799999999999999}, {
        3.5731045968704964`, 0.870006570104264}}], 
       ArrowBox[{{3.5733333333333337`, 1.04}, {3.5734142156426256`, 
        1.0465134344382676`}}], 
       ArrowBox[{{3.5733333333333337`, 1.2000000000000002`}, {
        3.5734978095136074`, 1.1918853225690678`}}], 
       ArrowBox[{{3.5733333333333337`, 1.3599999999999999`}, {
        3.573489132406508, 1.3545890918101344`}}], 
       ArrowBox[{{3.5733333333333337`, 1.52}, {3.57327565876171, 
        1.4973151275515024`}}], 
       ArrowBox[{{3.5733333333333337`, 1.6800000000000002`}, {
        3.573440101760454, 1.682427593611573}}], 
       ArrowBox[{{3.5733333333333337`, 1.8399999999999999`}, {
        3.573266169906881, 1.7140069087279735`}}], 
       ArrowBox[{{3.5733333333333337`, 2.}, {3.5733070649080676`, 
        2.1567124701883436`}}], 
       ArrowBox[{{3.7333333333333334`, -2.}, {
        3.7333341351938296`, -2.05279887530341}}], 
       ArrowBox[{{3.7333333333333334`, -1.84}, {
        3.7332893241430196`, -1.8063863547556278`}}], 
       ArrowBox[{{3.7333333333333334`, -1.68}, {
        3.7333658572065667`, -1.612423338927312}}], 
       ArrowBox[{{3.7333333333333334`, -1.52}, {
        3.7333782634001302`, -1.460502873125776}}], 
       ArrowBox[{{3.7333333333333334`, -1.3599999999999999`}, {
        3.7335134003608923`, -1.3991567546217962`}}], 
       ArrowBox[{{3.7333333333333334`, -1.2}, {
        3.733301070536276, -1.2963128832117508`}}], 
       ArrowBox[{{3.7333333333333334`, -1.04}, {
        3.7335141944714043`, -1.062948525260898}}], 
       ArrowBox[{{3.7333333333333334`, -0.8799999999999999}, {
        3.733387635714785, -0.8601835431635916}}], 
       ArrowBox[{{3.7333333333333334`, -0.72}, {
        3.733229903091091, -0.7121722635769916}}], 
       ArrowBox[{{3.7333333333333334`, -0.56}, {
        3.7333250944810676`, -0.5122022695612232}}], 
       ArrowBox[{{3.7333333333333334`, -0.3999999999999999}, {
        3.733495390768467, -0.4237848937179187}}], 
       ArrowBox[{{3.7333333333333334`, -0.24}, {
        3.733762982600941, -0.2476427273286025}}], 
       ArrowBox[{{3.7333333333333334`, -0.08000000000000007}, {
        3.733023171544403, -0.08212495047886201}}], 
       ArrowBox[{{3.7333333333333334`, 0.08000000000000007}, {
        3.733023171544403, 0.08212495047886201}}], 
       ArrowBox[{{3.7333333333333334`, 0.2400000000000002}, {
        3.733762982600941, 0.24764272732860274`}}], 
       ArrowBox[{{3.7333333333333334`, 0.3999999999999999}, {
        3.733495390768467, 0.4237848937179187}}], 
       ArrowBox[{{3.7333333333333334`, 0.56}, {3.7333250944810676`, 
        0.5122022695612232}}], 
       ArrowBox[{{3.7333333333333334`, 0.7200000000000002}, {
        3.733229903091091, 0.7121722635769918}}], 
       ArrowBox[{{3.7333333333333334`, 0.8799999999999999}, {
        3.733387635714785, 0.8601835431635916}}], 
       ArrowBox[{{3.7333333333333334`, 1.04}, {3.7335141944714043`, 
        1.062948525260898}}], 
       ArrowBox[{{3.7333333333333334`, 1.2000000000000002`}, {
        3.733301070536276, 1.296312883211751}}], 
       ArrowBox[{{3.7333333333333334`, 1.3599999999999999`}, {
        3.7335134003608923`, 1.3991567546217962`}}], 
       ArrowBox[{{3.7333333333333334`, 1.52}, {3.7333782634001302`, 
        1.4605028731257759`}}], 
       ArrowBox[{{3.7333333333333334`, 1.6800000000000002`}, {
        3.7333658572065667`, 1.6124233389273122`}}], 
       ArrowBox[{{3.7333333333333334`, 1.8399999999999999`}, {
        3.7332893241430196`, 1.8063863547556278`}}], 
       ArrowBox[{{3.7333333333333334`, 2.}, {3.7333341351938296`, 
        2.05279887530341}}], 
       ArrowBox[{{3.8933333333333335`, -2.}, {
        3.8933336133843977`, -2.023807576989797}}], 
       ArrowBox[{{3.8933333333333335`, -1.84}, {
        3.8933742105194664`, -1.929918172238577}}], 
       ArrowBox[{{3.8933333333333335`, -1.68}, {
        3.8932284418395904`, -1.8249859355678764`}}], 
       ArrowBox[{{3.8933333333333335`, -1.52}, {
        3.8933339460311487`, -1.499812948363117}}], 
       ArrowBox[{{3.8933333333333335`, -1.3599999999999999`}, {
        3.893398381018674, -1.4557743384342607`}}], 
       ArrowBox[{{3.8933333333333335`, -1.2}, {
        3.8933294606271875`, -1.133900674091623}}], 
       ArrowBox[{{3.8933333333333335`, -1.04}, {
        3.8934338319661927`, -1.010600586817582}}], 
       ArrowBox[{{3.8933333333333335`, -0.8799999999999999}, {
        3.8932155555883177`, -0.9042090406693584}}], 
       ArrowBox[{{3.8933333333333335`, -0.72}, {
        3.8933130080529073`, -0.688853286980006}}], 
       ArrowBox[{{3.8933333333333335`, -0.56}, {
        3.8933047477865763`, -0.5963503046621351}}], 
       ArrowBox[{{3.8933333333333335`, -0.3999999999999999}, {
        3.8931929762755026`, -0.37856207348604}}], 
       ArrowBox[{{3.8933333333333335`, -0.24}, {
        3.8936456723641193`, -0.24773576686276627`}}], 
       ArrowBox[{{3.8933333333333335`, -0.08000000000000007}, {
        3.8919570532241945`, -0.08083146711705035}}], 
       ArrowBox[{{3.8933333333333335`, 0.08000000000000007}, {
        3.8919570532241945`, 0.08083146711705035}}], 
       ArrowBox[{{3.8933333333333335`, 0.2400000000000002}, {
        3.8936456723641193`, 0.24773576686276655`}}], 
       ArrowBox[{{3.8933333333333335`, 0.3999999999999999}, {
        3.8931929762755026`, 0.37856207348604}}], 
       ArrowBox[{{3.8933333333333335`, 0.56}, {3.8933047477865763`, 
        0.5963503046621351}}], 
       ArrowBox[{{3.8933333333333335`, 0.7200000000000002}, {
        3.8933130080529073`, 0.6888532869800063}}], 
       ArrowBox[{{3.8933333333333335`, 0.8799999999999999}, {
        3.8932155555883177`, 0.9042090406693584}}], 
       ArrowBox[{{3.8933333333333335`, 1.04}, {3.8934338319661927`, 
        1.010600586817582}}], 
       ArrowBox[{{3.8933333333333335`, 1.2000000000000002`}, {
        3.8933294606271875`, 1.1339006740916238`}}], 
       ArrowBox[{{3.8933333333333335`, 1.3599999999999999`}, {
        3.893398381018674, 1.4557743384342607`}}], 
       ArrowBox[{{3.8933333333333335`, 1.52}, {3.8933339460311487`, 
        1.499812948363117}}], 
       ArrowBox[{{3.8933333333333335`, 1.6800000000000002`}, {
        3.8932284418395904`, 1.824985935567877}}], 
       ArrowBox[{{3.8933333333333335`, 1.8399999999999999`}, {
        3.8933742105194664`, 1.9299181722385774`}}], 
       ArrowBox[{{3.8933333333333335`, 2.}, {3.8933336133843977`, 
        2.023807576989797}}], 
       ArrowBox[{{4.053333333333334, -2.}, {
        4.053329903713005, -2.125223050111526}}], 
       ArrowBox[{{4.053333333333334, -1.84}, {
        4.053345363169357, -1.7512517562044125`}}], 
       ArrowBox[{{4.053333333333334, -1.68}, {
        4.053412863781964, -1.5198766100890035`}}], 
       ArrowBox[{{4.053333333333334, -1.52}, {
        4.053395746044957, -1.4559733888353048`}}], 
       ArrowBox[{{4.053333333333334, -1.3599999999999999`}, {
        4.053347465980392, -1.3703425667231426`}}], 
       ArrowBox[{{4.053333333333334, -1.2}, {
        4.053320727361066, -1.1520003792707874`}}], 
       ArrowBox[{{4.053333333333334, -1.04}, {
        4.053258953307994, -1.0424716319435798`}}], 
       ArrowBox[{{4.053333333333334, -0.8799999999999999}, {
        4.053404200985514, -0.8581436777231432}}], 
       ArrowBox[{{4.053333333333334, -0.72}, {
        4.053350322213414, -0.7406577334227399}}], 
       ArrowBox[{{4.053333333333334, -0.56}, {
        4.053324227071765, -0.5418832364891055}}], 
       ArrowBox[{{4.053333333333334, -0.3999999999999999}, {
        4.05321835669405, -0.39386993977167567`}}], 
       ArrowBox[{{4.053333333333334, -0.24}, {
        4.052784976956055, -0.25160760333729215`}}], 
       ArrowBox[{{4.053333333333334, -0.08000000000000007}, {
        4.053282270393543, -0.0776581619602344}}], 
       ArrowBox[{{4.053333333333334, 0.08000000000000007}, {4.053282270393543,
         0.0776581619602344}}], 
       ArrowBox[{{4.053333333333334, 0.2400000000000002}, {4.052784976956055, 
        0.25160760333729243`}}], 
       ArrowBox[{{4.053333333333334, 0.3999999999999999}, {4.05321835669405, 
        0.39386993977167567`}}], 
       ArrowBox[{{4.053333333333334, 0.56}, {4.053324227071765, 
        0.5418832364891055}}], 
       ArrowBox[{{4.053333333333334, 0.7200000000000002}, {4.053350322213414, 
        0.7406577334227401}}], 
       ArrowBox[{{4.053333333333334, 0.8799999999999999}, {4.053404200985514, 
        0.8581436777231432}}], 
       ArrowBox[{{4.053333333333334, 1.04}, {4.053258953307994, 
        1.0424716319435798`}}], 
       ArrowBox[{{4.053333333333334, 1.2000000000000002`}, {4.053320727361066,
         1.1520003792707876`}}], 
       ArrowBox[{{4.053333333333334, 1.3599999999999999`}, {4.053347465980392,
         1.3703425667231426`}}], 
       ArrowBox[{{4.053333333333334, 1.52}, {4.053395746044957, 
        1.4559733888353048`}}], 
       ArrowBox[{{4.053333333333334, 1.6800000000000002`}, {4.053412863781964,
         1.5198766100890038`}}], 
       ArrowBox[{{4.053333333333334, 1.8399999999999999`}, {4.053345363169357,
         1.751251756204412}}], 
       ArrowBox[{{4.053333333333334, 2.}, {4.053329903713005, 
        2.125223050111526}}], 
       ArrowBox[{{4.213333333333333, -2.}, {
        4.213330603615596, -2.049349256667786}}], 
       ArrowBox[{{4.213333333333333, -1.84}, {
        4.213322977819183, -1.8300257863489178`}}], 
       ArrowBox[{{4.213333333333333, -1.68}, {
        4.213360182626295, -1.5758527616208249`}}], 
       ArrowBox[{{4.213333333333333, -1.52}, {
        4.213368875959654, -1.5404700498539714`}}], 
       ArrowBox[{{4.213333333333333, -1.3599999999999999`}, {
        4.213343505064032, -1.3786281574652164`}}], 
       ArrowBox[{{4.213333333333333, -1.2}, {
        4.213356634853249, -1.2624399876630492`}}], 
       ArrowBox[{{4.213333333333333, -1.04}, {
        4.213389941983946, -0.9911788367257762}}], 
       ArrowBox[{{4.213333333333333, -0.8799999999999999}, {
        4.213363157039244, -0.8218767617681598}}], 
       ArrowBox[{{4.213333333333333, -0.72}, {
        4.213336177381215, -0.7117416136531244}}], 
       ArrowBox[{{4.213333333333333, -0.56}, {
        4.213487758137202, -0.5357129387343842}}], 
       ArrowBox[{{4.213333333333333, -0.3999999999999999}, {
        4.213135113535042, -0.42944791019236744`}}], 
       ArrowBox[{{4.213333333333333, -0.24}, {
        4.213329322229386, -0.23186952365463387`}}], 
       ArrowBox[{{4.213333333333333, -0.08000000000000007}, {
        4.213470411174823, -0.07607328328224869}}], 
       ArrowBox[{{4.213333333333333, 0.08000000000000007}, {4.213470411174823,
         0.07607328328224869}}], 
       ArrowBox[{{4.213333333333333, 0.2400000000000002}, {4.213329322229386, 
        0.2318695236546341}}], 
       ArrowBox[{{4.213333333333333, 0.3999999999999999}, {4.213135113535042, 
        0.42944791019236744`}}], 
       ArrowBox[{{4.213333333333333, 0.56}, {4.213487758137202, 
        0.5357129387343842}}], 
       ArrowBox[{{4.213333333333333, 0.7200000000000002}, {4.213336177381215, 
        0.7117416136531246}}], 
       ArrowBox[{{4.213333333333333, 0.8799999999999999}, {4.213363157039244, 
        0.8218767617681598}}], 
       ArrowBox[{{4.213333333333333, 1.04}, {4.213389941983946, 
        0.9911788367257762}}], 
       ArrowBox[{{4.213333333333333, 1.2000000000000002`}, {4.213356634853249,
         1.2624399876630494`}}], 
       ArrowBox[{{4.213333333333333, 1.3599999999999999`}, {4.213343505064032,
         1.3786281574652164`}}], 
       ArrowBox[{{4.213333333333333, 1.52}, {4.213368875959654, 
        1.5404700498539714`}}], 
       ArrowBox[{{4.213333333333333, 1.6800000000000002`}, {4.213360182626295,
         1.5758527616208249`}}], 
       ArrowBox[{{4.213333333333333, 1.8399999999999999`}, {4.213322977819183,
         1.8300257863489178`}}], 
       ArrowBox[{{4.213333333333333, 2.}, {4.213330603615596, 
        2.049349256667786}}], 
       ArrowBox[{{4.373333333333333, -2.}, {
        4.373334446024025, -2.1571067761756457`}}], 
       ArrowBox[{{4.373333333333333, -1.84}, {
        4.373335558714717, -1.7884470346483639`}}], 
       ArrowBox[{{4.373333333333333, -1.68}, {
        4.373339850863188, -1.7498324140165007`}}], 
       ArrowBox[{{4.373333333333333, -1.52}, {
        4.3733357341436765`, -1.4928192625840102`}}], 
       ArrowBox[{{4.373333333333333, -1.3599999999999999`}, {
        4.3733461699050284`, -1.4057435631898298`}}], 
       ArrowBox[{{4.373333333333333, -1.2}, {
        4.373355157355431, -1.1500726644692634`}}], 
       ArrowBox[{{4.373333333333333, -1.04}, {
        4.373337557653752, -0.9634729714975914}}], 
       ArrowBox[{{4.373333333333333, -0.8799999999999999}, {
        4.373337536768096, -0.862622378447382}}], 
       ArrowBox[{{4.373333333333333, -0.72}, {
        4.373362477900088, -0.7309648893247493}}], 
       ArrowBox[{{4.373333333333333, -0.56}, {
        4.373452398312122, -0.5635020174576518}}], 
       ArrowBox[{{4.373333333333333, -0.3999999999999999}, {
        4.373422600775144, -0.37693002722808655`}}], 
       ArrowBox[{{4.373333333333333, -0.24}, {
        4.37328691921357, -0.22939308976014847`}}], 
       ArrowBox[{{4.373333333333333, -0.08000000000000007}, {
        4.373459048829148, -0.07510001234750738}}], 
       ArrowBox[{{4.373333333333333, 0.08000000000000007}, {4.373459048829148,
         0.07510001234750738}}], 
       ArrowBox[{{4.373333333333333, 0.2400000000000002}, {4.37328691921357, 
        0.22939308976014866`}}], 
       ArrowBox[{{4.373333333333333, 0.3999999999999999}, {4.373422600775144, 
        0.37693002722808655`}}], 
       ArrowBox[{{4.373333333333333, 0.56}, {4.373452398312122, 
        0.5635020174576518}}], 
       ArrowBox[{{4.373333333333333, 0.7200000000000002}, {4.373362477900088, 
        0.7309648893247496}}], 
       ArrowBox[{{4.373333333333333, 0.8799999999999999}, {4.373337536768096, 
        0.862622378447382}}], 
       ArrowBox[{{4.373333333333333, 1.04}, {4.373337557653752, 
        0.9634729714975914}}], 
       ArrowBox[{{4.373333333333333, 1.2000000000000002`}, {4.373355157355431,
         1.1500726644692638`}}], 
       ArrowBox[{{4.373333333333333, 1.3599999999999999`}, {
        4.3733461699050284`, 1.4057435631898298`}}], 
       ArrowBox[{{4.373333333333333, 1.52}, {4.3733357341436765`, 
        1.4928192625840102`}}], 
       ArrowBox[{{4.373333333333333, 1.6800000000000002`}, {4.373339850863188,
         1.7498324140165011`}}], 
       ArrowBox[{{4.373333333333333, 1.8399999999999999`}, {4.373335558714717,
         1.7884470346483632`}}], 
       ArrowBox[{{4.373333333333333, 2.}, {4.373334446024025, 
        2.1571067761756457`}}], 
       ArrowBox[{{4.533333333333333, -2.}, {
        4.533335961231857, -2.188847769454416}}], 
       ArrowBox[{{4.533333333333333, -1.84}, {
        4.533337718685991, -1.9037976376945482`}}], 
       ArrowBox[{{4.533333333333333, -1.68}, {
        4.5333235296800245`, -1.5706572610078569`}}], 
       ArrowBox[{{4.533333333333333, -1.52}, {
        4.533315476634733, -1.6012828430758403`}}], 
       ArrowBox[{{4.533333333333333, -1.3599999999999999`}, {
        4.533314966842248, -1.345001341838398}}], 
       ArrowBox[{{4.533333333333333, -1.2}, {
        4.533350801273543, -1.1677661518906768`}}], 
       ArrowBox[{{4.533333333333333, -1.04}, {
        4.533336178740075, -1.061982908866327}}], 
       ArrowBox[{{4.533333333333333, -0.8799999999999999}, {
        4.533313992000199, -0.9099529706095024}}], 
       ArrowBox[{{4.533333333333333, -0.72}, {
        4.533353515593995, -0.7023571482114643}}], 
       ArrowBox[{{4.533333333333333, -0.56}, {
        4.533243473382392, -0.5914676203733408}}], 
       ArrowBox[{{4.533333333333333, -0.3999999999999999}, {
        4.533247648390937, -0.41474924033785615`}}], 
       ArrowBox[{{4.533333333333333, -0.24}, {
        4.533299658402762, -0.23635239649142714`}}], 
       ArrowBox[{{4.533333333333333, -0.08000000000000007}, {
        4.533052054597783, -0.08488327291647454}}], 
       ArrowBox[{{4.533333333333333, 0.08000000000000007}, {4.533052054597783,
         0.08488327291647454}}], 
       ArrowBox[{{4.533333333333333, 0.2400000000000002}, {4.533299658402762, 
        0.2363523964914273}}], 
       ArrowBox[{{4.533333333333333, 0.3999999999999999}, {4.533247648390937, 
        0.41474924033785615`}}], 
       ArrowBox[{{4.533333333333333, 0.56}, {4.533243473382392, 
        0.5914676203733408}}], 
       ArrowBox[{{4.533333333333333, 0.7200000000000002}, {4.533353515593995, 
        0.7023571482114647}}], 
       ArrowBox[{{4.533333333333333, 0.8799999999999999}, {4.533313992000199, 
        0.9099529706095024}}], 
       ArrowBox[{{4.533333333333333, 1.04}, {4.533336178740075, 
        1.061982908866327}}], 
       ArrowBox[{{4.533333333333333, 1.2000000000000002`}, {4.533350801273543,
         1.167766151890677}}], 
       ArrowBox[{{4.533333333333333, 1.3599999999999999`}, {4.533314966842248,
         1.345001341838398}}], 
       ArrowBox[{{4.533333333333333, 1.52}, {4.533315476634733, 
        1.6012828430758403`}}], 
       ArrowBox[{{4.533333333333333, 1.6800000000000002`}, {
        4.5333235296800245`, 1.5706572610078566`}}], 
       ArrowBox[{{4.533333333333333, 1.8399999999999999`}, {4.533337718685991,
         1.9037976376945478`}}], 
       ArrowBox[{{4.533333333333333, 2.}, {4.533335961231857, 
        2.188847769454416}}], 
       ArrowBox[{{4.693333333333333, -2.}, {
        4.693333445984878, -2.1719855287214425`}}], 
       ArrowBox[{{4.693333333333333, -1.84}, {
        4.6933400507356655`, -1.834450608946749}}], 
       ArrowBox[{{4.693333333333333, -1.68}, {
        4.693340068180303, -1.72234764155166}}], 
       ArrowBox[{{4.693333333333333, -1.52}, {
        4.6933369494892325`, -1.4721993477343418`}}], 
       ArrowBox[{{4.693333333333333, -1.3599999999999999`}, {
        4.693332088217456, -1.3455713160869307`}}], 
       ArrowBox[{{4.693333333333333, -1.2}, {
        4.693334938218595, -1.167325531643836}}], 
       ArrowBox[{{4.693333333333333, -1.04}, {
        4.693331360092319, -1.0249358238343798`}}], 
       ArrowBox[{{4.693333333333333, -0.8799999999999999}, {
        4.693328791223033, -0.8787450866289642}}], 
       ArrowBox[{{4.693333333333333, -0.72}, {
        4.693345782080083, -0.7085944549672671}}], 
       ArrowBox[{{4.693333333333333, -0.56}, {
        4.693258501582164, -0.5539767979948933}}], 
       ArrowBox[{{4.693333333333333, -0.3999999999999999}, {
        4.69328141782931, -0.38961863982337247`}}], 
       ArrowBox[{{4.693333333333333, -0.24}, {
        4.693401144615393, -0.2387239595056649}}], 
       ArrowBox[{{4.693333333333333, -0.08000000000000007}, {
        4.6933843393977375`, -0.08037990633392635}}], 
       ArrowBox[{{4.693333333333333, 0.08000000000000007}, {
        4.6933843393977375`, 0.08037990633392635}}], 
       ArrowBox[{{4.693333333333333, 0.2400000000000002}, {4.693401144615393, 
        0.23872395950566513`}}], 
       ArrowBox[{{4.693333333333333, 0.3999999999999999}, {4.69328141782931, 
        0.38961863982337247`}}], 
       ArrowBox[{{4.693333333333333, 0.56}, {4.693258501582164, 
        0.5539767979948933}}], 
       ArrowBox[{{4.693333333333333, 0.7200000000000002}, {4.693345782080083, 
        0.7085944549672674}}], 
       ArrowBox[{{4.693333333333333, 0.8799999999999999}, {4.693328791223033, 
        0.8787450866289642}}], 
       ArrowBox[{{4.693333333333333, 1.04}, {4.693331360092319, 
        1.0249358238343798`}}], 
       ArrowBox[{{4.693333333333333, 1.2000000000000002`}, {4.693334938218595,
         1.1673255316438362`}}], 
       ArrowBox[{{4.693333333333333, 1.3599999999999999`}, {4.693332088217456,
         1.3455713160869307`}}], 
       ArrowBox[{{4.693333333333333, 1.52}, {4.6933369494892325`, 
        1.4721993477343418`}}], 
       ArrowBox[{{4.693333333333333, 1.6800000000000002`}, {4.693340068180303,
         1.7223476415516605`}}], 
       ArrowBox[{{4.693333333333333, 1.8399999999999999`}, {
        4.6933400507356655`, 1.8344506089467483`}}], 
       ArrowBox[{{4.693333333333333, 2.}, {4.693333445984878, 
        2.1719855287214425`}}], 
       ArrowBox[{{4.8533333333333335`, -2.}, {
        4.8533330845790426`, -2.1491190541733465`}}], 
       ArrowBox[{{4.8533333333333335`, -1.84}, {
        4.853333578122492, -1.8871875878516877`}}], 
       ArrowBox[{{4.8533333333333335`, -1.68}, {
        4.853336778272922, -1.6463342145053903`}}], 
       ArrowBox[{{4.8533333333333335`, -1.52}, {
        4.853334891998109, -1.5540787554969042`}}], 
       ArrowBox[{{4.8533333333333335`, -1.3599999999999999`}, {
        4.853332023811389, -1.4374233876313645`}}], 
       ArrowBox[{{4.8533333333333335`, -1.2}, {
        4.853331333514847, -1.2100362711627106`}}], 
       ArrowBox[{{4.8533333333333335`, -1.04}, {
        4.853329911363727, -1.0092773036933533`}}], 
       ArrowBox[{{4.8533333333333335`, -0.8799999999999999}, {
        4.853332441962655, -0.8412791625099394}}], 
       ArrowBox[{{4.8533333333333335`, -0.72}, {
        4.853354457312418, -0.6915770562979566}}], 
       ArrowBox[{{4.8533333333333335`, -0.56}, {
        4.853304597578068, -0.5901578029695733}}], 
       ArrowBox[{{4.8533333333333335`, -0.3999999999999999}, {
        4.853387106545525, -0.4086631492120135}}], 
       ArrowBox[{{4.8533333333333335`, -0.24}, {
        4.85332933244832, -0.24438318621106753`}}], 
       ArrowBox[{{4.8533333333333335`, -0.08000000000000007}, {
        4.853377928865266, -0.07777341814770841}}], 
       ArrowBox[{{4.8533333333333335`, 0.08000000000000007}, {
        4.853377928865266, 0.07777341814770841}}], 
       ArrowBox[{{4.8533333333333335`, 0.2400000000000002}, {4.85332933244832,
         0.24438318621106775`}}], 
       ArrowBox[{{4.8533333333333335`, 0.3999999999999999}, {
        4.853387106545525, 0.4086631492120135}}], 
       ArrowBox[{{4.8533333333333335`, 0.56}, {4.853304597578068, 
        0.5901578029695733}}], 
       ArrowBox[{{4.8533333333333335`, 0.7200000000000002}, {
        4.853354457312418, 0.6915770562979568}}], 
       ArrowBox[{{4.8533333333333335`, 0.8799999999999999}, {
        4.853332441962655, 0.8412791625099394}}], 
       ArrowBox[{{4.8533333333333335`, 1.04}, {4.853329911363727, 
        1.0092773036933533`}}], 
       ArrowBox[{{4.8533333333333335`, 1.2000000000000002`}, {
        4.853331333514847, 1.2100362711627108`}}], 
       ArrowBox[{{4.8533333333333335`, 1.3599999999999999`}, {
        4.853332023811389, 1.4374233876313645`}}], 
       ArrowBox[{{4.8533333333333335`, 1.52}, {4.853334891998109, 
        1.5540787554969042`}}], 
       ArrowBox[{{4.8533333333333335`, 1.6800000000000002`}, {
        4.853336778272922, 1.6463342145053905`}}], 
       ArrowBox[{{4.8533333333333335`, 1.8399999999999999`}, {
        4.853333578122492, 1.8871875878516873`}}], 
       ArrowBox[{{4.8533333333333335`, 2.}, {4.8533330845790426`, 
        2.1491190541733465`}}], 
       ArrowBox[{{5.013333333333334, -2.}, {
        5.01333268371539, -2.11207077434209}}], 
       ArrowBox[{{5.013333333333334, -1.84}, {
        5.013334980918157, -1.9412881133865827`}}], 
       ArrowBox[{{5.013333333333334, -1.68}, {
        5.013336108832279, -1.6720271919029817`}}], 
       ArrowBox[{{5.013333333333334, -1.52}, {
        5.0133350294676715`, -1.5253611175129755`}}], 
       ArrowBox[{{5.013333333333334, -1.3599999999999999`}, {
        5.013334147066562, -1.4068330281954027`}}], 
       ArrowBox[{{5.013333333333334, -1.2}, {
        5.013336740075859, -1.255688165890962}}], 
       ArrowBox[{{5.013333333333334, -1.04}, {
        5.013324916811932, -1.0783537378963208`}}], 
       ArrowBox[{{5.013333333333334, -0.8799999999999999}, {
        5.013332830917267, -0.8250993351145403}}], 
       ArrowBox[{{5.013333333333334, -0.72}, {
        5.013359802077101, -0.728161328827322}}], 
       ArrowBox[{{5.013333333333334, -0.56}, {
        5.0133717702439915`, -0.5827063549302726}}], 
       ArrowBox[{{5.013333333333334, -0.3999999999999999}, {
        5.013317629890481, -0.435344874349398}}], 
       ArrowBox[{{5.013333333333334, -0.24}, {
        5.01332373535858, -0.25386490183810484`}}], 
       ArrowBox[{{5.013333333333334, -0.08000000000000007}, {
        5.013367886553884, -0.07890209141857286}}], 
       ArrowBox[{{5.013333333333334, 0.08000000000000007}, {5.013367886553884,
         0.07890209141857286}}], 
       ArrowBox[{{5.013333333333334, 0.2400000000000002}, {5.01332373535858, 
        0.25386490183810506`}}], 
       ArrowBox[{{5.013333333333334, 0.3999999999999999}, {5.013317629890481, 
        0.435344874349398}}], 
       ArrowBox[{{5.013333333333334, 0.56}, {5.0133717702439915`, 
        0.5827063549302726}}], 
       ArrowBox[{{5.013333333333334, 0.7200000000000002}, {5.013359802077101, 
        0.7281613288273221}}], 
       ArrowBox[{{5.013333333333334, 0.8799999999999999}, {5.013332830917267, 
        0.8250993351145403}}], 
       ArrowBox[{{5.013333333333334, 1.04}, {5.013324916811932, 
        1.0783537378963208`}}], 
       ArrowBox[{{5.013333333333334, 1.2000000000000002`}, {5.013336740075859,
         1.2556881658909622`}}], 
       ArrowBox[{{5.013333333333334, 1.3599999999999999`}, {5.013334147066562,
         1.4068330281954027`}}], 
       ArrowBox[{{5.013333333333334, 1.52}, {5.0133350294676715`, 
        1.5253611175129755`}}], 
       ArrowBox[{{5.013333333333334, 1.6800000000000002`}, {5.013336108832279,
         1.672027191902982}}], 
       ArrowBox[{{5.013333333333334, 1.8399999999999999`}, {5.013334980918157,
         1.9412881133865827`}}], 
       ArrowBox[{{5.013333333333334, 2.}, {5.01333268371539, 
        2.11207077434209}}], 
       ArrowBox[{{5.173333333333334, -2.}, {
        5.17333353968818, -2.0321038719171174`}}], 
       ArrowBox[{{5.173333333333334, -1.84}, {
        5.173333060815479, -1.8684740303312244`}}], 
       ArrowBox[{{5.173333333333334, -1.68}, {
        5.173333887208383, -1.5275928069504248`}}], 
       ArrowBox[{{5.173333333333334, -1.52}, {
        5.173333926817121, -1.5634807239482957`}}], 
       ArrowBox[{{5.173333333333334, -1.3599999999999999`}, {
        5.173333172081391, -1.35899276647093}}], 
       ArrowBox[{{5.173333333333334, -1.2}, {
        5.173333448394932, -1.2294161058961497`}}], 
       ArrowBox[{{5.173333333333334, -1.04}, {
        5.173339932297224, -0.9837931111796969}}], 
       ArrowBox[{{5.173333333333334, -0.8799999999999999}, {
        5.173337509934709, -0.8381075014277308}}], 
       ArrowBox[{{5.173333333333334, -0.72}, {
        5.17333138911338, -0.7126419011532035}}], 
       ArrowBox[{{5.173333333333334, -0.56}, {
        5.173344049327554, -0.5695076329347778}}], 
       ArrowBox[{{5.173333333333334, -0.3999999999999999}, {
        5.1733625761711695`, -0.4198070030067924}}], 
       ArrowBox[{{5.173333333333334, -0.24}, {
        5.173345885839081, -0.24870350899706506`}}], 
       ArrowBox[{{5.173333333333334, -0.08000000000000007}, {
        5.173310274450535, -0.07986433908246449}}], 
       ArrowBox[{{5.173333333333334, 0.08000000000000007}, {5.173310274450535,
         0.07986433908246449}}], 
       ArrowBox[{{5.173333333333334, 0.2400000000000002}, {5.173345885839081, 
        0.2487035089970653}}], 
       ArrowBox[{{5.173333333333334, 0.3999999999999999}, {
        5.1733625761711695`, 0.4198070030067924}}], 
       ArrowBox[{{5.173333333333334, 0.56}, {5.173344049327554, 
        0.5695076329347778}}], 
       ArrowBox[{{5.173333333333334, 0.7200000000000002}, {5.17333138911338, 
        0.7126419011532037}}], 
       ArrowBox[{{5.173333333333334, 0.8799999999999999}, {5.173337509934709, 
        0.8381075014277308}}], 
       ArrowBox[{{5.173333333333334, 1.04}, {5.173339932297224, 
        0.9837931111796969}}], 
       ArrowBox[{{5.173333333333334, 1.2000000000000002`}, {5.173333448394932,
         1.2294161058961497`}}], 
       ArrowBox[{{5.173333333333334, 1.3599999999999999`}, {5.173333172081391,
         1.35899276647093}}], 
       ArrowBox[{{5.173333333333334, 1.52}, {5.173333926817121, 
        1.5634807239482955`}}], 
       ArrowBox[{{5.173333333333334, 1.6800000000000002`}, {5.173333887208383,
         1.5275928069504248`}}], 
       ArrowBox[{{5.173333333333334, 1.8399999999999999`}, {5.173333060815479,
         1.8684740303312244`}}], 
       ArrowBox[{{5.173333333333334, 2.}, {5.17333353968818, 
        2.0321038719171174`}}], 
       ArrowBox[{{5.333333333333334, -2.}, {
        5.333333355694131, -2.081113927518355}}], 
       ArrowBox[{{5.333333333333334, -1.84}, {
        5.3333334042170595`, -1.8065031617121818`}}], 
       ArrowBox[{{5.333333333333334, -1.68}, {
        5.3333334162918895`, -1.5419171177405457`}}], 
       ArrowBox[{{5.333333333333334, -1.52}, {
        5.333333427136876, -1.526296061243396}}], 
       ArrowBox[{{5.333333333333334, -1.3599999999999999`}, {
        5.333333184075016, -1.3224293595488712`}}], 
       ArrowBox[{{5.333333333333334, -1.2}, {
        5.333333351221971, -1.175231282847074}}], 
       ArrowBox[{{5.333333333333334, -1.04}, {
        5.333332882539674, -1.068910302857787}}], 
       ArrowBox[{{5.333333333333334, -0.8799999999999999}, {
        5.333329676895871, -0.8444245041583526}}], 
       ArrowBox[{{5.333333333333334, -0.72}, {
        5.333334943310691, -0.710030387655839}}], 
       ArrowBox[{{5.333333333333334, -0.56}, {
        5.333328532023084, -0.528350913896171}}], 
       ArrowBox[{{5.333333333333334, -0.3999999999999999}, {
        5.333337948601756, -0.39007208754742734`}}], 
       ArrowBox[{{5.333333333333334, -0.24}, {
        5.333340345679153, -0.2455999220084475}}], 
       ArrowBox[{{5.333333333333334, -0.08000000000000007}, {
        5.333332274326006, -0.07860813173934882}}], 
       ArrowBox[{{5.333333333333334, 0.08000000000000007}, {5.333332274326006,
         0.07860813173934882}}], 
       ArrowBox[{{5.333333333333334, 0.2400000000000002}, {5.333340345679153, 
        0.24559992200844774`}}], 
       ArrowBox[{{5.333333333333334, 0.3999999999999999}, {5.333337948601756, 
        0.39007208754742734`}}], 
       ArrowBox[{{5.333333333333334, 0.56}, {5.333328532023084, 
        0.528350913896171}}], 
       ArrowBox[{{5.333333333333334, 0.7200000000000002}, {5.333334943310691, 
        0.7100303876558391}}], 
       ArrowBox[{{5.333333333333334, 0.8799999999999999}, {5.333329676895871, 
        0.8444245041583526}}], 
       ArrowBox[{{5.333333333333334, 1.04}, {5.333332882539674, 
        1.068910302857787}}], 
       ArrowBox[{{5.333333333333334, 1.2000000000000002`}, {5.333333351221971,
         1.175231282847074}}], 
       ArrowBox[{{5.333333333333334, 1.3599999999999999`}, {5.333333184075016,
         1.3224293595488712`}}], 
       ArrowBox[{{5.333333333333334, 1.52}, {5.333333427136876, 
        1.526296061243396}}], 
       ArrowBox[{{5.333333333333334, 1.6800000000000002`}, {
        5.3333334162918895`, 1.5419171177405455`}}], 
       ArrowBox[{{5.333333333333334, 1.8399999999999999`}, {
        5.3333334042170595`, 1.8065031617121816`}}], 
       ArrowBox[{{5.333333333333334, 2.}, {5.333333355694131, 
        2.081113927518355}}]}, CircleBox[{3.333333333333334, 0.}], 
      CircleBox[{3.333333333333334, 0.}, 1.3]},
     AspectRatio->1,
     DisplayFunction->Identity,
     Frame->True,
     PlotRange->{{1.2533333333333334`, 5.413333333333334}, {-2.08, 2.08}},
     PlotRangeClipping->True,
     PlotRangePadding->{Automatic, Automatic}], {-1, -1.}, {
    Left, Bottom}, {2, 2.}], GraphicsGroupBox[{
     {GrayLevel[0], RectangleBox[{-0.85, 1.05}, {1.0499999999999998`, 1.35}]}, 
     {GrayLevel[1], EdgeForm[{GrayLevel[0], Thickness[0.001]}], 
      GraphicsGroupBox[{
        RectangleBox[{-0.9, 1.1}, {0.9999999999999999, 1.4000000000000001`}], 
        InsetBox[
         GraphicsBox[{{{
             {Hue[0.6666666666666666], RectangleBox[{0, 0}]}, 
             InsetBox["\<\"0.867\"\>", 
              NCache[{Rational[1, 2], 1}, {0.5, 1}], {0, -1}, Automatic, {1, 
              0}]}, {
             {Hue[0.5925925925925926], RectangleBox[{1, 0}]}, 
             InsetBox["\<\"\"\>", NCache[{Rational[3, 2], 1}, {1.5, 1}], {0, -1},
               Automatic, {1, 0}]}, {
             {Hue[0.5185185185185185], RectangleBox[{2, 0}]}, 
             InsetBox["\<\"\"\>", NCache[{Rational[5, 2], 1}, {2.5, 1}], {0, -1},
               Automatic, {1, 0}]}, {
             {Hue[0.4444444444444444], RectangleBox[{3, 0}]}, 
             InsetBox["\<\"\"\>", NCache[{Rational[7, 2], 1}, {3.5, 1}], {0, -1},
               Automatic, {1, 0}]}, {
             {Hue[0.37037037037037035`], RectangleBox[{4, 0}]}, 
             InsetBox["\<\"\"\>", NCache[{Rational[9, 2], 1}, {4.5, 1}], {0, -1},
               Automatic, {1, 0}]}, {
             {Hue[0.2962962962962963], RectangleBox[{5, 0}]}, 
             InsetBox["\<\"\"\>", NCache[{Rational[11, 2], 1}, {5.5, 1}], {0, -1},
               Automatic, {1, 0}]}, {
             {Hue[0.2222222222222222], RectangleBox[{6, 0}]}, 
             InsetBox["\<\"\"\>", NCache[{Rational[13, 2], 1}, {6.5, 1}], {0, -1},
               Automatic, {1, 0}]}, {
             {Hue[0.14814814814814814`], RectangleBox[{7, 0}]}, 
             InsetBox["\<\"\"\>", NCache[{Rational[15, 2], 1}, {7.5, 1}], {0, -1},
               Automatic, {1, 0}]}, {
             {Hue[0.07407407407407407], RectangleBox[{8, 0}]}, 
             InsetBox["\<\"\"\>", NCache[{Rational[17, 2], 1}, {8.5, 1}], {0, -1},
               Automatic, {1, 0}]}, {
             {Hue[0.], RectangleBox[{9, 0}]}, 
             InsetBox["\<\"1.457\"\>", 
              NCache[{Rational[19, 2], 1}, {9.5, 1}], {0, -1}, Automatic, {1, 
              0}]}}, InsetBox["\<\"|vector|=4.928e-16\"\>", 
            NCache[{5, Rational[5, 2]}, {5, 2.5}], {0, 0}]},
          AspectRatio->0.15789473684210525`,
          PlotRange->{{-0.2, 10.2}, {-0.2, 3.2}}], {-0.9, 1.1}, {
         Left, Bottom}, {1.9, 0.3}]}]}}]},
  AspectRatio->Automatic,
  Background->None,
  ColorOutput->Automatic,
  ImageSize->Automatic,
  PlotRange->All]], "Output",
 CellChangeTimes->{{3.602068774219273*^9, 3.602068778941846*^9}, 
   3.6020689019787354`*^9, 3.6020690083603697`*^9, 3.602069064598733*^9, 
   3.6020691518925743`*^9, 3.60206922128614*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{"Show", "[", 
  RowBox[{
   RowBox[{"GraphicsRow", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"SectionRZ", "[", 
        RowBox[{"Bxi", ",", "Byi", ",", "Bzi", ",", "0.6"}], "]"}], ",", 
       RowBox[{"SectionR\[CapitalPhi]", "[", 
        RowBox[{"Bxi", ",", "Byi", ",", "Bzi", ",", 
         RowBox[{"Mean", "[", 
          RowBox[{
          "bounds", "\[LeftDoubleBracket]", "3", "\[RightDoubleBracket]"}], 
          "]"}], ",", 
         RowBox[{"AspectRatio", "\[Rule]", "Automatic"}]}], "]"}], ",", 
       RowBox[{"Section\[CapitalPhi]Z", "[", 
        RowBox[{"Bxi", ",", "Byi", ",", "Bzi", ",", 
         RowBox[{"Mean", "[", 
          RowBox[{
          "bounds", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], 
          "]"}], ",", 
         RowBox[{"AspectRatio", "\[Rule]", "Automatic"}]}], "]"}]}], "}"}], 
     ",", 
     RowBox[{"Spacings", "\[Rule]", 
      RowBox[{"Scaled", "[", "0.`", "]"}]}]}], "]"}], ",", 
   RowBox[{"AspectRatio", "\[Rule]", "1"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.396025293699*^9, 3.3960253253190002`*^9}, {
  3.602062784560755*^9, 3.6020627849407606`*^9}, {3.60206300622666*^9, 
  3.602063043149727*^9}}],

Cell[BoxData[
 RowBox[{"Show", "[", 
  RowBox[{
   RowBox[{"GraphicsRow", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{"SectionRZ", "[", 
        RowBox[{"jxi", ",", "jyi", ",", "jzi", ",", 
         RowBox[{"0.3`", " ", "\[Pi]"}]}], "]"}], ",", 
       RowBox[{"SectionR\[CapitalPhi]", "[", 
        RowBox[{"jxi", ",", "jyi", ",", "jzi", ",", 
         RowBox[{"Mean", "[", 
          RowBox[{
          "bounds", "\[LeftDoubleBracket]", "3", "\[RightDoubleBracket]"}], 
          "]"}]}], "]"}], ",", 
       RowBox[{"Section\[CapitalPhi]Z", "[", 
        RowBox[{"jxi", ",", "jyi", ",", "jzi", ",", 
         RowBox[{"Mean", "[", 
          RowBox[{
          "bounds", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], 
          "]"}]}], "]"}]}], "}"}], ",", 
     RowBox[{"Spacings", "\[Rule]", 
      RowBox[{"Scaled", "[", "0.`", "]"}]}]}], "]"}], ",", 
   RowBox[{"AspectRatio", "\[Rule]", "1"}], ",", 
   RowBox[{"ImageSize", "\[Rule]", "1000"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.396025315835*^9, 3.396025342025*^9}, {
  3.3960253720690002`*^9, 3.3960254024049997`*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell["\:041e\:0446\:0435\:043d\:043a\:0438 \:0437\:0430\:043a\:0440\:0443\
\:0442\:043a\:0438", "Subsubsection",
 CellChangeTimes->{{3.4591488744375*^9, 3.459148879453125*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"{", 
    RowBox[{"vx", ",", "vy", ",", "vz"}], "}"}], "=", 
   RowBox[{"Take", "[", 
    RowBox[{"out", ",", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"2", ",", "4"}], "}"}], "-", "1"}]}], "]"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.459148908421875*^9, 3.45914891409375*^9}, {
  3.45916167953125*^9, 3.459161682*^9}, {3.46149555615625*^9, 
  3.461495556609375*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ListLogPlot", "[", 
  RowBox[{"{", 
   RowBox[{
    RowBox[{"Max", "/@", 
     RowBox[{"Flatten", "/@", 
      SuperscriptBox["vx", "\[Transpose]"]}]}], ",", 
    SqrtBox[
     RowBox[{"Mean", "/@", 
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{"Flatten", "/@", 
         SuperscriptBox["vz", "\[Transpose]"]}], ")"}], "2"]}]]}], "}"}], 
  "]"}]], "Input",
 CellChangeTimes->{{3.4552483847604*^9, 3.4552484003454*^9}, {
  3.4552484825434*^9, 3.4552485279063997`*^9}, {3.4552486253814*^9, 
  3.4552486633764*^9}, {3.459148917359375*^9, 3.459148919859375*^9}}],

Cell[BoxData[
 GraphicsBox[{{}, {}, 
   {Hue[0.9060679774997897, 0.6, 0.6], PointBox[CompressedData["
1:eJw90wsslWEcx/GjplUb4jAMc4iYDqPjltv5uXPOcZyTVqY0aUdtlds0M5eO
LJeaXEanHc1EONrkWmItZLWwac0lzFmSGorkFjXdlv/7bu/efd7v+7x73+d9
H4vYhGOyXSwWK+jv/u/4f1vmx0TxtePHN7p3TkBRXXyp6Q15LzzcuUqdAfIB
aCZ6WdX2kPWha2pht9ZGNsIzQ01Xdi3ZFE/mOUrPMjIHDtsx/JfXyJZg97Mi
dZLJVljg5nHNYsmH0Nk/YHZQQraFSWSGwagv2Q6qlumCZh8yF63RRTc+MN0B
Q2m8io0gsiPO2slTG8VkJ5iLeIk/o8hHIPZz4Y5eIPMwkndZXHCF7Iy7Lc6r
6myyCyzqJ8c0isiumLveqdVWQXZDn7U6ZbiO7I7y8ZLe+WbyUexuuKgo6CJ7
oKbyofJEH9kTJaZxvN/M/Huhly2a6mS+jzeslTFnat6SfTBR7mI+OUXmI1c3
9UXuezJw3N7pS8nHHcuBRznctK456r5wGpKux32m7ouU6tclBkvU/aBjPxch
W6buB0tVYWbvN+r+iL255fVqhbo/+Fgs9V2jHoD9w1aH89epB4DNzXrcQWYF
gsfP16pjeiD0bidwZBvUg2DM9jbS/k49CNIHrRXxTA+G7XlnfQUzPhjn6gXP
Z5n7h+D003sNjnS9PAQnNW5VbTPPF4otQ4PMslXqochf3V65Q2YJkD4rbFcx
XYCiLNmPPfS+LCE6TByzbJj5EULgme0985W6CKpTUpaKLBehr7BhRLFIPQxc
fruxAzP/YbBZN8uQLFAXI7lpn1b0PHUxVBO52TmfqIejytR85NcM9XDwaswr
r05Tl6BsM6I/Tr1jSGA5+E7Pk9a/XIK+zeKlJPq/eiRwi24sHOyn8VJwkuzV
Qlr/kIJvly7MpPUvl0J7LCqt9P5G9x9j1X8p
     "]]}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesOrigin->{0., -1.4353161761111493`},
  CoordinatesToolOptions:>{"DisplayFunction" -> ({
      Part[#, 1], 
      Exp[
       Part[#, 2]]}& ), "CopiedValueFunction" -> ({
      Part[#, 1], 
      Exp[
       Part[#, 2]]}& )},
  FrameTicks->{{{{-1.4354846053106622`, 
       FormBox["0.23800000000000002`", TraditionalForm], {0.00625, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.25]}}, {-1.4271163556401458`, 
       FormBox["0.24`", TraditionalForm], {0.00625, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.25]}}, {-1.4188175528254507`, 
       FormBox["0.242`", TraditionalForm], {0.00625, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.25]}}, {-1.410587053688935, 
       FormBox["0.244`", TraditionalForm], {0.00625, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.25]}}, {-1.4024237430497744`, 
       FormBox["0.246`", TraditionalForm], {0.00625, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.25]}}, {-1.3943265328171548`, 
       FormBox["0.248`", TraditionalForm], {0.00625, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.25]}}, {-1.4333859686537411`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.4312917270506265`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.429201862131167, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.4250351894363211`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.422958345491482, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.4208858058895097`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.4167535686045991`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.4146938356415886`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.4126383364594928`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.4085399700672103`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.40649706843741, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.4044583317475619`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.4003932854993923`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.3983669423541598`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.3963446969733921`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.3923124334454537`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}}, {{-1.4354846053106622`, 
       FormBox["\"\"", TraditionalForm], {0.00625, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.25]}}, {-1.4271163556401458`, 
       FormBox["\"\"", TraditionalForm], {0.00625, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.25]}}, {-1.4188175528254507`, 
       FormBox["\"\"", TraditionalForm], {0.00625, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.25]}}, {-1.410587053688935, 
       FormBox["\"\"", TraditionalForm], {0.00625, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.25]}}, {-1.4024237430497744`, 
       FormBox["\"\"", TraditionalForm], {0.00625, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.25]}}, {-1.3943265328171548`, 
       FormBox["\"\"", TraditionalForm], {0.00625, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.25]}}, {-1.4333859686537411`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.4312917270506265`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.429201862131167, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.4250351894363211`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.422958345491482, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.4208858058895097`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.4167535686045991`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.4146938356415886`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.4126383364594928`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.4085399700672103`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.40649706843741, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.4044583317475619`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.4003932854993923`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.3983669423541598`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.3963446969733921`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}, {-1.3923124334454537`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        GrayLevel[0.], 
        AbsoluteThickness[0.125]}}}}, {Automatic, Automatic}},
  GridLines->{None, None},
  Method->{},
  PlotRange->{{0., 70.}, {-1.4353161761111493`, -1.390305079064186}},
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], 
    Scaled[0.02]},
  Ticks->{Automatic, {{-1.4354846053106622`, 
      FormBox["0.23800000000000002`", TraditionalForm], {0.00625, 0.}, {
       GrayLevel[0.], 
       AbsoluteThickness[0.25]}}, {-1.4271163556401458`, 
      FormBox["0.24`", TraditionalForm], {0.00625, 0.}, {
       GrayLevel[0.], 
       AbsoluteThickness[0.25]}}, {-1.4188175528254507`, 
      FormBox["0.242`", TraditionalForm], {0.00625, 0.}, {
       GrayLevel[0.], 
       AbsoluteThickness[0.25]}}, {-1.410587053688935, 
      FormBox["0.244`", TraditionalForm], {0.00625, 0.}, {
       GrayLevel[0.], 
       AbsoluteThickness[0.25]}}, {-1.4024237430497744`, 
      FormBox["0.246`", TraditionalForm], {0.00625, 0.}, {
       GrayLevel[0.], 
       AbsoluteThickness[0.25]}}, {-1.3943265328171548`, 
      FormBox["0.248`", TraditionalForm], {0.00625, 0.}, {
       GrayLevel[0.], 
       AbsoluteThickness[0.25]}}, {-1.4333859686537411`, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       GrayLevel[0.], 
       AbsoluteThickness[0.125]}}, {-1.4312917270506265`, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       GrayLevel[0.], 
       AbsoluteThickness[0.125]}}, {-1.429201862131167, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       GrayLevel[0.], 
       AbsoluteThickness[0.125]}}, {-1.4250351894363211`, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       GrayLevel[0.], 
       AbsoluteThickness[0.125]}}, {-1.422958345491482, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       GrayLevel[0.], 
       AbsoluteThickness[0.125]}}, {-1.4208858058895097`, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       GrayLevel[0.], 
       AbsoluteThickness[0.125]}}, {-1.4167535686045991`, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       GrayLevel[0.], 
       AbsoluteThickness[0.125]}}, {-1.4146938356415886`, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       GrayLevel[0.], 
       AbsoluteThickness[0.125]}}, {-1.4126383364594928`, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       GrayLevel[0.], 
       AbsoluteThickness[0.125]}}, {-1.4085399700672103`, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       GrayLevel[0.], 
       AbsoluteThickness[0.125]}}, {-1.40649706843741, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       GrayLevel[0.], 
       AbsoluteThickness[0.125]}}, {-1.4044583317475619`, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       GrayLevel[0.], 
       AbsoluteThickness[0.125]}}, {-1.4003932854993923`, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       GrayLevel[0.], 
       AbsoluteThickness[0.125]}}, {-1.3983669423541598`, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       GrayLevel[0.], 
       AbsoluteThickness[0.125]}}, {-1.3963446969733921`, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       GrayLevel[0.], 
       AbsoluteThickness[0.125]}}, {-1.3923124334454537`, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       GrayLevel[0.], 
       AbsoluteThickness[0.125]}}}}]], "Output",
 CellChangeTimes->{3.461495585890625*^9, 3.486887384528625*^9, 
  3.4868878063255*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData["k"], "Input",
 CellChangeTimes->{3.461495575421875*^9}],

Cell[BoxData[
 GraphicsBox[{{}, 
   {Hue[0.67, 0.6, 0.6], PointBox[CompressedData["
1:eJw103lIFGEcxvFJO6zo9MBIbLWSTVJWK13N42lzXVdNRxMNURRxKTpYCdl2
TWiSJBXs+iPEMiktO9guzaLDo9VITAnSpHS90DYzj1I31zwq+r0Dw/CZ78w7
zMz7uqSpY1VWHMeF/t3/Hf9v48HmpXC19ePq6AQcx52ytf6LyDYoT+oNCRhe
qP3vtYib4AeX9/8m22HO6vM5x6fTZEdcTdarKzOmyE5wuXjF+OLxD7IIRqd7
gTMHRsiuSEztSOCah8hbMGBS1X8yfSG7IUcbll16qZ8shrTntSzxt5Hsjtbb
xudbZV3k7XD7eYvbNMjsiTWTZyIcNN1kCc5nPpoo5XvJXth8yiN6c3Ef2Rv6
g2VG+0n2vB24Fu9c7ZA4QN4J6w2HGzrfDJJ3IWvaQ1XnayL74Cjv36ir+Er2
xcsjF7UFq7+Rpdg2bnJtUw+T/RCk7lU9av1O9kdXuiWZF4+Sd+NJQlJajGaM
HID1Oh+DTco4ORBHOsrzEqzZ9w2CfWV6ysoy5mBMiVcdyJH+JANye/m7oSay
AJhqTn6oT5mgvgcGj87zPhNkYQ90880rrmsnqctw9lh8/YiFLMhwp3KgbTSX
/e+9eFdT7XlirZn6XgxtbHmPXDIXgqZ+TWqUmfUQGBQLGwu0v6jL0V2YkbfO
Qhbk4BStFZIINr9CITYtaQguIguhsMrRX1GLLNQV8LzwQuquJwsKxGof37w/
xHoYRhU28nyXGephuK2Gd38DmVNC6SURsjJofgtKzBZ/Ob44n833cKx433KO
L2Y9HM/UQs4t9Sz1CIQYhuWiuDnqETBr05YtuJG5SOyUjt08NEbXC5HIfBgs
cneap74PiZ3JD16l03oT9qFPiJW0VbEehdz2kU7LNBs/CprMjhLZZbY+o6Hp
uVFRoqf1LESjsamlaLKddR5z8qWlNxQ0HnjoIoM+nlay63lUGbyUAbtp/dfx
iBy5m9T8lt0fg2LRa9vwBnp/xEBcWPTMuYT9jxj0PQiyO7x/qvYPzwN3nA==

     "]]}, 
   {Hue[0.9060679774997897, 0.6, 0.6], PointBox[CompressedData["
1:eJw10w0s1HEcx/Hr3HkInTYbLdohh3QSkpOHD+c8c6eGPGSGGrHcuGp62plu
pdVE6+nYilCpsPRIQtHTZT0htWwWpkjJpFnSw/y+/+2//17/9/77/fd7sEnL
3biVy+Fwgv/d/58L16T/cIEz72y3aTt7gYKGHu+8UAGzIZ54ztsHcambYZs4
j2c3bsRsjpRfqrlndw2YLVE0LXjVNMtntsLNaGHtyygesxCCLt/EAz+4zLbo
M8qsnhOTV0Jf90KVdGQRswhTKcmzERoOsyNil96r+ZT5p23Bq9Dp37jHTERe
DQulasBbQ3YBRBIjZ1P63hWSmViNdht5LcxnNK0ZnWQ3ZN8pLE9fSeO7Qzp7
6cPdg2QPdD3K52WMkNfBy7jnXHIw/b8ntP3LnZpryetRp/sq8+DrMXtBWbbL
xzGNLIGLRYLY/D7ZG0Un1hwOtKT52oAUVbzD3A6yDx6bvNbb+ZDsC6W0ZV+a
Bc23H0SFfrYlWWR/1Gwpuexxmwzoj5wor+LqL1gNxKw4NpojZ+YEwCVSrJjW
Ug+A9ZHuOrdB6oGw2SpwyrZj660OhO57hkiZTesvhe5QQ3L/depSzC+qSJdO
Ug9CX+28vNXZkPUgWOt1XxTmMXNkOF/fsb3+DnUZkkoN5hsmqAfD/bdf1hkh
23/qYCjjPgfcyqL9GIKQAN4DwxvUQ+BlV9nbNkA9FPmjmvF3vMWshwJjFomn
4pk5YYho7g2yu0Y9DGMnh3IcOqmHI3U/X1L+lno4rqSnaXkwZj0C4WUjBs71
zOoIjKW2tFZXUo+EfAh7q45Tj8RE47dLQnsT1qNQPBQ3UdHFrI7C1Nm1DT9z
qUcjfs+mgkJL6tG4XBueKOTR+ZTDg/sm1ctoCetyNB09LhFbUVdgJiF2824J
+x4KvB+8+tZ3mHW1ArLnCY0X6Py3K/Bor6rYd5jGj0HKR7OO0l42n4jBstOu
Ovs6Wu8YPNVmSHy+8Nv/Ak7KM7k=
     "]]}, {}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesOrigin->{0., -3.910468461742797},
  CoordinatesToolOptions:>{"DisplayFunction" -> ({
      Part[#, 1], 
      Exp[
       Part[#, 2]]}& ), "CopiedValueFunction" -> ({
      Part[#, 1], 
      Exp[
       Part[#, 2]]}& )},
  FrameTicks->{{{{-4.605170185988092, 
       FormBox[
        TagBox[
         InterpretationBox["\"0.01\"", 0.01, AutoDelete -> True], 
         NumberForm[#, {
           DirectedInfinity[1], 2}, NumberPadding -> {"", "0"}]& ], 
        TraditionalForm]}, {-3.912023005428146, 
       FormBox[
        TagBox[
         InterpretationBox["\"0.02\"", 0.02, AutoDelete -> True], 
         NumberForm[#, {
           DirectedInfinity[1], 2}, NumberPadding -> {"", "0"}]& ], 
        TraditionalForm]}, {-2.995732273553991, 
       FormBox[
        TagBox[
         InterpretationBox["\"0.05\"", 0.05, AutoDelete -> True], 
         NumberForm[#, {
           DirectedInfinity[1], 2}, NumberPadding -> {"", "0"}]& ], 
        TraditionalForm]}, {-2.302585092994046, 
       FormBox[
        TagBox[
         InterpretationBox["\"0.10\"", 0.1, AutoDelete -> True], 
         NumberForm[#, {
           DirectedInfinity[1], 2}, NumberPadding -> {"", "0"}]& ], 
        TraditionalForm]}, {-1.6094379124341003`, 
       FormBox[
        TagBox[
         InterpretationBox["\"0.20\"", 0.2, AutoDelete -> True], 
         NumberForm[#, {
           DirectedInfinity[1], 2}, NumberPadding -> {"", "0"}]& ], 
        TraditionalForm]}, {-0.6931471805599453, 
       FormBox[
        TagBox[
         InterpretationBox["\"0.50\"", 0.5, AutoDelete -> True], 
         NumberForm[#, {
           DirectedInfinity[1], 2}, NumberPadding -> {"", "0"}]& ], 
        TraditionalForm]}, {0., 
       FormBox[
        TagBox[
         InterpretationBox["\"1.00\"", 1., AutoDelete -> True], NumberForm[#, {
           DirectedInfinity[1], 2}, NumberPadding -> {"", "0"}]& ], 
        TraditionalForm]}, {0.6931471805599453, 
       FormBox[
        TagBox[
         InterpretationBox["\"2.00\"", 2., AutoDelete -> True], NumberForm[#, {
           DirectedInfinity[1], 2}, NumberPadding -> {"", "0"}]& ], 
        TraditionalForm]}, {1.6094379124341003`, 
       FormBox[
        TagBox[
         InterpretationBox["\"5.00\"", 5., AutoDelete -> True], NumberForm[#, {
           DirectedInfinity[1], 2}, NumberPadding -> {"", "0"}]& ], 
        TraditionalForm]}, {-3.506557897319982, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}, {-3.2188758248682006`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}, {-2.8134107167600364`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}, {-2.6592600369327783`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}, {-2.5257286443082556`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}, {-2.4079456086518722`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}, {-1.2039728043259361`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}, {-0.916290731874155, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}, {-0.5108256237659907, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}, {-0.35667494393873245`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}, {-0.2231435513142097, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}, {-0.10536051565782628`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}, {1.0986122886681098`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}, {1.3862943611198906`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}}, {{-4.605170185988092, 
       FormBox["\"\"", TraditionalForm]}, {-3.912023005428146, 
       FormBox["\"\"", TraditionalForm]}, {-2.995732273553991, 
       FormBox["\"\"", TraditionalForm]}, {-2.302585092994046, 
       FormBox["\"\"", TraditionalForm]}, {-1.6094379124341003`, 
       FormBox["\"\"", TraditionalForm]}, {-0.6931471805599453, 
       FormBox["\"\"", TraditionalForm]}, {0., 
       FormBox["\"\"", TraditionalForm]}, {0.6931471805599453, 
       FormBox["\"\"", TraditionalForm]}, {1.6094379124341003`, 
       FormBox["\"\"", TraditionalForm]}, {-3.506557897319982, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}, {-3.2188758248682006`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}, {-2.8134107167600364`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}, {-2.6592600369327783`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}, {-2.5257286443082556`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}, {-2.4079456086518722`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}, {-1.2039728043259361`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}, {-0.916290731874155, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}, {-0.5108256237659907, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}, {-0.35667494393873245`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}, {-0.2231435513142097, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}, {-0.10536051565782628`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}, {1.0986122886681098`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}, {1.3862943611198906`, 
       FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
        Thickness[0.001]}}}}, {Automatic, Automatic}},
  GridLines->{None, None},
  Method->{},
  PlotRange->{{0., 70.}, {-3.910468461742797, -0.4415373158323178}},
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], 
    Scaled[0.02]},
  Ticks->{Automatic, {{-4.605170185988092, 
      FormBox[
       TagBox[
        InterpretationBox["\"0.01\"", 0.01, AutoDelete -> True], 
        NumberForm[#, {
          DirectedInfinity[1], 2}, NumberPadding -> {"", "0"}]& ], 
       TraditionalForm]}, {-3.912023005428146, 
      FormBox[
       TagBox[
        InterpretationBox["\"0.02\"", 0.02, AutoDelete -> True], 
        NumberForm[#, {
          DirectedInfinity[1], 2}, NumberPadding -> {"", "0"}]& ], 
       TraditionalForm]}, {-2.995732273553991, 
      FormBox[
       TagBox[
        InterpretationBox["\"0.05\"", 0.05, AutoDelete -> True], 
        NumberForm[#, {
          DirectedInfinity[1], 2}, NumberPadding -> {"", "0"}]& ], 
       TraditionalForm]}, {-2.302585092994046, 
      FormBox[
       TagBox[
        InterpretationBox["\"0.10\"", 0.1, AutoDelete -> True], NumberForm[#, {
          DirectedInfinity[1], 2}, NumberPadding -> {"", "0"}]& ], 
       TraditionalForm]}, {-1.6094379124341003`, 
      FormBox[
       TagBox[
        InterpretationBox["\"0.20\"", 0.2, AutoDelete -> True], NumberForm[#, {
          DirectedInfinity[1], 2}, NumberPadding -> {"", "0"}]& ], 
       TraditionalForm]}, {-0.6931471805599453, 
      FormBox[
       TagBox[
        InterpretationBox["\"0.50\"", 0.5, AutoDelete -> True], NumberForm[#, {
          DirectedInfinity[1], 2}, NumberPadding -> {"", "0"}]& ], 
       TraditionalForm]}, {0., 
      FormBox[
       TagBox[
        InterpretationBox["\"1.00\"", 1., AutoDelete -> True], NumberForm[#, {
          DirectedInfinity[1], 2}, NumberPadding -> {"", "0"}]& ], 
       TraditionalForm]}, {0.6931471805599453, 
      FormBox[
       TagBox[
        InterpretationBox["\"2.00\"", 2., AutoDelete -> True], NumberForm[#, {
          DirectedInfinity[1], 2}, NumberPadding -> {"", "0"}]& ], 
       TraditionalForm]}, {1.6094379124341003`, 
      FormBox[
       TagBox[
        InterpretationBox["\"5.00\"", 5., AutoDelete -> True], NumberForm[#, {
          DirectedInfinity[1], 2}, NumberPadding -> {"", "0"}]& ], 
       TraditionalForm]}, {-3.506557897319982, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       Thickness[0.001]}}, {-3.2188758248682006`, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       Thickness[0.001]}}, {-2.8134107167600364`, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       Thickness[0.001]}}, {-2.6592600369327783`, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       Thickness[0.001]}}, {-2.5257286443082556`, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       Thickness[0.001]}}, {-2.4079456086518722`, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       Thickness[0.001]}}, {-1.2039728043259361`, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       Thickness[0.001]}}, {-0.916290731874155, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       Thickness[0.001]}}, {-0.5108256237659907, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       Thickness[0.001]}}, {-0.35667494393873245`, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       Thickness[0.001]}}, {-0.2231435513142097, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       Thickness[0.001]}}, {-0.10536051565782628`, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       Thickness[0.001]}}, {1.0986122886681098`, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       Thickness[0.001]}}, {1.3862943611198906`, 
      FormBox["\"\"", TraditionalForm], {0.00375, 0.}, {
       Thickness[0.001]}}}}]], "Output",
 CellChangeTimes->{3.459148694234375*^9, 3.459148920703125*^9, 
  3.459161683453125*^9, 3.459162490484375*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"helicity", "=", 
   RowBox[{"Total", "[", 
    RowBox[{"MapThread", "[", 
     RowBox[{"Times", ",", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"Take", "[", 
         RowBox[{"out", ",", "3"}], "]"}], ",", 
        RowBox[{"rotd", "[", 
         RowBox[{
          RowBox[{"Sequence", "@@", 
           RowBox[{"Take", "[", 
            RowBox[{"out", ",", "3"}], "]"}]}], ",", "ghost"}], "]"}]}], 
       "}"}]}], "]"}], "]"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.448356159578125*^9, 3.448356161765625*^9}, {
  3.44835632528125*^9, 3.44835632553125*^9}, {3.459148805203125*^9, 
  3.459148813328125*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ListPlot", "[", 
  RowBox[{"WithoutFict", "[", 
   RowBox[{"Max", "/@", 
    SuperscriptBox["helicity", "\[Transpose]"]}], "]"}], "]"}]], "Input",
 CellChangeTimes->{{3.459148824921875*^9, 3.459148838640625*^9}}],

Cell[BoxData[
 GraphicsBox[
  {Hue[0.67, 0.6, 0.6], PointBox[CompressedData["
1:eJw103lIFGEYx/HVvNosldQOr1wtNSy807Tdn9d6rLrmUV5gmomaFyq14h9N
ZZIatGgeRWC5lqYppKXFliAelLemQmZGGtm1togRRNJBzzswDJ/5zjzMy/Ba
p+ZFndLk8Xj4e/67/j/UohYHd33TzQ9EdANDt79xZtm9ZD14FnduOMoHyIaY
C1K7S1yfk40Rd/0jb3ZymLwTxubCs/z4UbI5DH1l+n7TY+Q9cJzVa+ctTpIF
UI+l1cVnTZNt4fOhfaMieoq8D08la4LWi+Nke4zGxM2luYyQ92ObSdlrxTnW
HZHKr46NMXpJPogePZ3V1sxZshPyvw8fm1thdkZtcPSljnRmF/wMi38TIp8h
u8J0XZ24fJLNc0OhzaCHWwf7PnfcaTBq4ronyB6wr9NoLGhi6z+EImFr7fvB
F2RP3CvQUi5VDZG9oLtdWSgt7ycfhqtD+YlhYR/ZG4GK++6mJex/+OCKwab5
fNUT8hFMqz16Krp6yEKsW5ZaZXxhFkHLK69HYfiYDAhy+GJlMpkDSlM1ko8q
WPfFoiohJVrOui9klpa55dms+0E19IvvVc+6Hw4kOlWeVrLuD9ndxrbFJNb9
kSHQueXAZz0AubVVmfIE1gPwbOuytUsz64E4Y60dMW7EeiAMmy8LeJlsPWJM
ReW3iXvJnBje0pGOpB3s/SC4FMl+SPayHoQlTVHOV8tu6sH4PBJbb3GDzAVD
1tdWVW/L5oeAU8qFla8eUQ+BlYHCDdUPqYfC6mpizVsx66Ew0QkwCNrF5kuQ
JU4xOz5Az3MS1Cj0o/qFXdTDUGqymzc/R+bCUGbn+2ntJpsfjox3ipWW86yH
w1nDr0HF66QegYX00AttE7RfuQhY6I5tKZth+1cKm9IVu8gSep6TYuFasWPz
JOuRWGr9na292iL6A6goGOs=
    "]]},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesOrigin->{0, Automatic},
  PlotRange->Automatic,
  PlotRangeClipping->True]], "Output",
 CellChangeTimes->{{3.459148821046875*^9, 3.45914883890625*^9}, {
   3.459161823890625*^9, 3.4591618269375*^9}, {3.459162492765625*^9, 
   3.45916249578125*^9}, 3.486887826403625*^9}]
}, Open  ]],

Cell[BoxData[{
 RowBox[{
  RowBox[{"phi", "=", 
   RowBox[{"Outer", "[", 
    RowBox[{"ArcTan", ",", 
     RowBox[{"coor", "[", 
      RowBox[{"[", "1", "]"}], "]"}], ",", 
     RowBox[{"coor", "[", 
      RowBox[{"[", "3", "]"}], "]"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"vphi", "=", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"vx", "[", 
        RowBox[{"[", 
         RowBox[{"All", ",", "ny", ",", "All"}], "]"}], "]"}], 
       RowBox[{"Sin", "[", "phi", "]"}]}], "-", 
      RowBox[{
       RowBox[{"vz", "[", 
        RowBox[{"[", 
         RowBox[{"All", ",", "ny", ",", "All"}], "]"}], "]"}], 
       RowBox[{"Cos", "[", "phi", "]"}]}]}], ",", 
     RowBox[{"{", 
      RowBox[{"ny", ",", 
       RowBox[{
        RowBox[{"Dimensions", "[", "vx", "]"}], "[", 
        RowBox[{"[", "2", "]"}], "]"}]}], "}"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"vrho", "=", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"vx", "[", 
        RowBox[{"[", 
         RowBox[{"All", ",", "ny", ",", "All"}], "]"}], "]"}], 
       RowBox[{"Cos", "[", "phi", "]"}]}], "+", 
      RowBox[{
       RowBox[{"vz", "[", 
        RowBox[{"[", 
         RowBox[{"All", ",", "ny", ",", "All"}], "]"}], "]"}], 
       RowBox[{"Sin", "[", "phi", "]"}]}]}], ",", 
     RowBox[{"{", 
      RowBox[{"ny", ",", 
       RowBox[{
        RowBox[{"Dimensions", "[", "vx", "]"}], "[", 
        RowBox[{"[", "2", "]"}], "]"}]}], "}"}]}], "]"}]}], ";"}]}], "Input",
 CellChangeTimes->{{3.427393291138*^9, 3.4273932918789997`*^9}, {
  3.427393425285*^9, 3.427393481516*^9}, {3.427393586804*^9, 
  3.427393621392*^9}, {3.427435180836*^9, 3.427435271693*^9}, {
  3.4274369167530003`*^9, 3.427436916927*^9}, {3.4283976370566*^9, 
  3.4283976376476*^9}}],

Cell[BoxData[
 RowBox[{"PrintRange", "[", 
  RowBox[{"Max", "/@", 
   RowBox[{"Flatten", "/@", 
    RowBox[{"Transpose", "[", "vy", "]"}]}]}], "]"}]], "Input",
 CellChangeTimes->{{3.427395137085*^9, 3.427395183943*^9}, {3.427395246123*^9,
    3.427395246368*^9}, {3.4274369344969997`*^9, 3.4274369381610003`*^9}, 
   3.427600228109375*^9, {3.427604543359375*^9, 3.427604544765625*^9}, {
   3.42761727959375*^9, 3.427617282390625*^9}, {3.4276232911875*^9, 
   3.42762330490625*^9}, {3.428220301453125*^9, 3.428220305296875*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Fit", "[", 
  RowBox[{
   RowBox[{"Take", "[", 
    RowBox[{
     RowBox[{"Transpose", "[", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"coor", "[", 
         RowBox[{"[", "2", "]"}], "]"}], ",", 
        RowBox[{"Log", "/@", 
         RowBox[{"Max", "/@", 
          RowBox[{"Flatten", "/@", "vphi"}]}]}]}], "}"}], "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"10", ",", "19"}], "}"}]}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{"1", ",", "z"}], "}"}], ",", "z"}], "]"}]], "Input",
 CellChangeTimes->{{3.427437273605*^9, 3.427437324414*^9}, {
  3.42760057534375*^9, 3.427600590078125*^9}, {3.427600877546875*^9, 
  3.427600879234375*^9}, {3.427617782484375*^9, 3.4276177841875*^9}, {
  3.427623319875*^9, 3.4276233211875*^9}, {3.4479962598598003`*^9, 
  3.447996260749*^9}, {3.45414340178125*^9, 3.454143402359375*^9}, {
  3.4543998913125*^9, 3.454399891703125*^9}, {3.486887453263*^9, 
  3.486887453513*^9}, {3.486887490778625*^9, 3.486887490997375*^9}, {
  3.486887735403625*^9, 3.486887743278625*^9}}],

Cell[BoxData[
 RowBox[{"0.1208858705574359`", "\[InvisibleSpace]", "-", 
  RowBox[{"0.025440419078044334`", " ", "z"}]}]], "Output",
 CellChangeTimes->{
  3.427617857453125*^9, {3.427623313046875*^9, 3.42762332184375*^9}, 
   3.447960836426375*^9, 3.4479960563932*^9, 3.4479961113738003`*^9, 
   3.4479962165386*^9, 3.4479962611702003`*^9, 3.453894340515625*^9, 
   3.453896158921875*^9, 3.454056050234375*^9, 3.454063633*^9, 
   3.4540676054375*^9, 3.4541350301875*^9, 3.454143402796875*^9, 
   3.459148934203125*^9, 3.45916177359375*^9, {3.486887430372375*^9, 
   3.486887453903625*^9}, 3.486887491388*^9, {3.486887738263*^9, 
   3.4868877437005*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"PrintRange", "[", 
  RowBox[{"Log", "/@", 
   RowBox[{"Max", "/@", 
    RowBox[{"Flatten", "/@", 
     RowBox[{"WithoutFict", "@", "vphi"}]}]}]}], "]"}], "\[IndentingNewLine]", 
 RowBox[{"PrintRange", "[", 
  RowBox[{"Log", "/@", 
   RowBox[{"Max", "/@", 
    RowBox[{"Flatten", "/@", 
     RowBox[{"WithoutFict", "@", "vrho"}]}]}]}], "]"}]}], "Input",
 CellChangeTimes->{{3.427394612619*^9, 3.427394677493*^9}, {3.427394785447*^9,
    3.427394836615*^9}, {3.427394867925*^9, 3.427394887585*^9}, {
   3.427395101862*^9, 3.427395115153*^9}, {3.4274351908640003`*^9, 
   3.427435204149*^9}, {3.4274369771619997`*^9, 3.427437036578*^9}, {
   3.427600392140625*^9, 3.427600395078125*^9}, {3.42760088640625*^9, 
   3.4276008865625*^9}, {3.427601002640625*^9, 3.427601004921875*^9}, 
   3.4276020473125*^9, {3.4289915580625*^9, 3.428991602375*^9}, {
   3.433582409515625*^9, 3.4335824161875*^9}, {3.433843103359375*^9, 
   3.43384311615625*^9}, {3.433843219296875*^9, 3.433843219671875*^9}, {
   3.4470658540018*^9, 3.4470658547427998`*^9}, {3.45414338875*^9, 
   3.4541433921875*^9}, {3.454144344390625*^9, 3.454144344765625*^9}, {
   3.45415077653125*^9, 3.45415077696875*^9}}],

Cell[BoxData[
 GraphicsBox[{{}, {}, 
   {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJw10nlIFGEYx/HByrwQKa9QaDPRWK9NTS2P/Xm13iuLaeYtXrRrVqgRlaxH
JmtJEYa6LpG3lrq2HutRHli5hKZEQf1hiSShUEaUZBoVPu/AMHzmOzDvPPMe
yiyQZOtxHId/5//rzrEu3JAE8SXLynG6gc6feeqP5VVkA6Tus9HwiguFOzbD
M43rskpXRzZHwN2VLnv/NrI1tMK07VdOvWRbZPcund/q1JB5eMfv8tJtDJHt
4N74ZWUufZRsj5UL1xouDYyRHeC4Zy0kv5n5CH6Z+czradjzfEjvz7p3Lw6T
nSE1zpPtmhkku2J5yihmyoK9X4D4CU+lVN1DPopUyethK8N2sjumWxTKwCYV
2QP1n+arDzxSkD3xxjBLnL2aQPM5hjtXJ2fL6mvIXmjLLay43dFI9kaB7rpW
c6uF7APf9FWth1EX+TiqQ9pNZr71kE9gLdZSb0bdR/ZF0cJYc2KPhuyHzUjL
GNXFAbI/yg1MJ25sDZIDoDZMr5D5a8lCiOxUAT6xw2Tgj23KFUXCyI7lgKI2
unS/zyj1QAhlqWdap8jyQDTOec1KncaoB2H2+0tT80GyPAi/z9U5qfhPqAej
5qxase5Nlgfj82bukL4z6yHIkNUnV0pZD4GVSe576QPWQ/HDWdwtSGI9FPYf
Mgw8ONZPIkWQ45JkzvpJDOjy9oodWRfBWjApKu5g6xOhKPX5aRcLtv4wNPQq
KuONWQ9DGKd0E+xmPRxNVQ5LDxPZ94ejlacssblH8+IisKqfZhyfzeYXAVG7
SubmyXokti/zahoTaN7ySJRIMvoW4tj/iIJx8OOx2vkh6lEIyg+dLvclc9Fw
GJl+YcfR/5RHI6O/edWstJ96DNKL3p766kf7QR6Dxaz6wINP2X4RIy/nsD4X
1ktdjPU4R8FNHttvsSjPbC/TJbeM/wWWkDId
     "]]}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesOrigin->{0, 0},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{3.45914895425*^9, 3.45916183753125*^9, 
  3.486887437872375*^9, 3.48688783735675*^9}],

Cell[BoxData[
 GraphicsBox[{{}, {}, 
   {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJw10mlIFGEcx/HNzBvRUjMMWkU0PDc1j9T2p655rO6almaamnjRrpShBlEy
3qElXUa2bpaurklerfedWLmIpgm+6IUUki9WCMUOCIUK/8/AMHzmOzDP/Oex
z7wan63H4/Hw7/x/3Ts2hbYJoS7xa4pJugHdr7yeL+V3yEZIO2in4RcXCvds
gWqNx5pS+5RshWOP1jscg9vIthgSpu9+dO0mH0Vi99drO680ZD7mXDp8tb8H
yQ5wbPy+vpAxSnbEesHtZzf6x8hOsD2wIcpvYT6ODQv/RT0Ne94FqU3zXp2r
w2Q3yEzz5PtnB8geWJs2kUxbs/cL4D/lo5D1dJFPIC1+efiwsZrshSpVjSKk
WUn2RsO3xdojr2vIPlgxzZJm65JoPifx6dbb+bKGOrIv2nILK+63N5L9wGkr
hzT3VGR/xGTohrxNOsgBaBSpzWa3usin8CPORm+2p5cciJKlsZbkLg05CH/E
NhLl9X5yMMqNzKeqdwbIp9FjnFEhDx4iC8G9GE0IiBsmA5cCGh7UJo3smQMe
1seWHvIfpR6CSHnaxdZpMheC1gXfeZnrGPVQrGzPmVsNkLlQyN7pRM9dxqmH
wSHHUrXlR+bCoF4dXTR0Y10EDd+7uFrGugh8s9zPspesh+Onm7RTkMJ6OEKU
lfY+PNbPIEeQ455ixfoZTGjzDKXOrEfAaXzXo6idrS8CJWnvL7hbs/VHorm7
pirRlPVInOUpPAX6rEdBP2FJ25HMvj8KXXxFid0TmhcvGtsG6aaJ2Wx+0YhT
K+WePqyLYXCTX9eYRPPmxKiOv9y7dI79jxhYhb0Zq18cpB4DcX74THkgmRcL
z5GZDw48+p9cLK70tegsSvuoS1DgUZS1GUT7gZPAskkl4U+w/SJFbe6ynV5k
N3Up9p13Ftzls/0Wh8eZ6jJtqmryL4N8MAs=
     "]]}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesOrigin->{0, 0},
  PlotRange->{All, All},
  PlotRangeClipping->True,
  PlotRangePadding->{Automatic, Automatic}]], "Output",
 CellChangeTimes->{3.45914895425*^9, 3.45916183753125*^9, 
  3.486887437872375*^9, 3.48688783741925*^9}]
}, Open  ]]
}, Closed]],

Cell[CellGroupData[{

Cell["\:0413\:0440\:0430\:0444\:0438\:043a\:0438 \:0441\:0435\:0447\:0435\
\:043d\:0438\:0439", "Subsubsection",
 CellChangeTimes->{{3.45914889146875*^9, 3.459148893828125*^9}, {
  3.459148993*^9, 3.459148996296875*^9}}],

Cell[BoxData[
 RowBox[{"DrawSection", "[", 
  RowBox[{
   RowBox[{"Sequence", "@@", 
    RowBox[{"Take", "[", 
     RowBox[{"out", ",", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"2", ",", "4"}], "}"}], "-", "1"}]}], "]"}]}], ",", 
   RowBox[{"PointOfSections", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{"0.5", ",", "0", ",", "0"}], "}"}]}]}], "]"}]], "Input",
 CellChangeTimes->{{3.435648899019875*^9, 3.4356489241605*^9}, {
  3.435650867707375*^9, 3.43565088887925*^9}, {3.453575840117*^9, 
  3.4535758409282*^9}, {3.454311717363*^9, 3.4543117183389997`*^9}, {
  3.459161522875*^9, 3.459161523671875*^9}, {3.4868879215755*^9, 
  3.486887921653625*^9}}],

Cell[BoxData[
 RowBox[{"DrawSection", "[", 
  RowBox[{"Bx", ",", "By", ",", "Bz", ",", 
   RowBox[{"PointOfSections", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{"0.5", ",", "0", ",", "0"}], "}"}]}]}], "]"}]], "Input",
 CellChangeTimes->{{3.3959993133079977`*^9, 3.3959993288879976`*^9}, {
   3.4085241121809998`*^9, 3.408524116578*^9}, 3.4356493330355*^9, 
   3.435649880519875*^9, 3.435664684363625*^9, 3.490682219765625*^9, {
   3.490682452046875*^9, 3.490682465078125*^9}, {3.49068472478125*^9, 
   3.49068472496875*^9}}],

Cell[BoxData[
 RowBox[{"DrawSection", "[", 
  RowBox[{"jx", ",", "jy", ",", "jz", ",", 
   RowBox[{"PointOfSections", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{"0.5", ",", "0", ",", "0"}], "}"}]}]}], "]"}]], "Input",
 CellChangeTimes->{{3.3959993133079977`*^9, 3.3959993288879976`*^9}, {
   3.4085241121809998`*^9, 3.408524116578*^9}, {3.408524345966*^9, 
   3.408524349671*^9}, 3.435664686738625*^9}],

Cell[BoxData[
 RowBox[{"PrintRange", "[", 
  RowBox[{"WithoutFict", "@", 
   RowBox[{"Bx", "\[LeftDoubleBracket]", 
    RowBox[{"10", ",", "All", ",", "25"}], "\[RightDoubleBracket]"}]}], 
  "]"}]], "Input",
 CellChangeTimes->{{3.411725979295*^9, 3.4117260972939997`*^9}, {
  3.4118171587349997`*^9, 3.411817162085*^9}, {3.411817214425*^9, 
  3.4118172449370003`*^9}, {3.411920335148*^9, 3.411920342076*^9}, {
  3.414393475776*^9, 3.414393478315*^9}, {3.416811010764*^9, 
  3.4168110119890003`*^9}}],

Cell[BoxData[
 RowBox[{"PrintRange", "[", 
  RowBox[{"Take", "[", 
   RowBox[{
    RowBox[{"Abs", "@", 
     RowBox[{"Fourier", "@", 
      RowBox[{"WithoutFict", "@", 
       RowBox[{"Bx", "\[LeftDoubleBracket]", 
        RowBox[{"15", ",", "All", ",", "15"}], 
        "\[RightDoubleBracket]"}]}]}]}], ",", "10"}], "]"}], "]"}]], "Input",
 CellChangeTimes->{{3.411725979295*^9, 3.4117260972939997`*^9}, {
   3.4118171587349997`*^9, 3.411817162085*^9}, {3.411817214425*^9, 
   3.4118172173059998`*^9}, 3.411920357159*^9, {3.412357840481*^9, 
   3.412357851087*^9}, {3.4123579287790003`*^9, 3.412358017223*^9}, 
   3.4127017185290003`*^9, {3.414393483159*^9, 3.414393492243*^9}, {
   3.4167658143741603`*^9, 3.41676581548516*^9}}],

Cell[BoxData[
 RowBox[{"ReadDrawSection", "[", 
  RowBox[{"\"\<dynamo_2_12820.snp\>\"", ",", "Binary", ",", "8", ",", 
   RowBox[{"{", 
    RowBox[{"5", ",", "6", ",", "7"}], "}"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.3960293462939997`*^9, 3.396029430333*^9}, {
  3.3960297593120003`*^9, 3.3960297613380003`*^9}}],

Cell[BoxData[
 RowBox[{"DrawSection", "[", 
  RowBox[{"Sequence", "@@", 
   RowBox[{"ReadSection", "[", "4314", "]"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.396031311271*^9, 3.3960313435950003`*^9}, {
  3.4118280295299997`*^9, 3.4118280307720003`*^9}}],

Cell[BoxData[
 RowBox[{"Table", "[", 
  RowBox[{
   RowBox[{"ListPlot3D", "[", 
    RowBox[{
     RowBox[{"Cut3D", "[", 
      RowBox[{"Az", ",", "2", ",", "i"}], "]"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", "All"}]}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{"i", ",", "1", ",", 
     RowBox[{
      RowBox[{"Dimensions", "[", "By", "]"}], "[", 
      RowBox[{"[", "2", "]"}], "]"}]}], "}"}]}], "]"}]], "Input",
 CellChangeTimes->{3.395826514834*^9}]
}, Closed]],

Cell[CellGroupData[{

Cell["\:0427\:0442\:0435\:043d\:0438\:0435 \:0432\:0434\:043e\:043b\:044c \
\:0441\:043d\:044d\:043f\:043e\:0432", "Subsubsection",
 CellChangeTimes->{{3.4535761513682003`*^9, 3.4535761659386*^9}}],

Cell[BoxData[{
 RowBox[{
  RowBox[{"Clear", "[", "ReadSection", "]"}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"ReadSection", "[", 
    RowBox[{"iter_", ",", 
     RowBox[{"\[Kappa]_Real:", "0"}], ",", 
     RowBox[{"fluct_Symbol:", "False"}]}], "]"}], ":=", 
   RowBox[{"Block", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"dump", ",", 
       RowBox[{"str", "=", 
        RowBox[{"ToString", "[", "iter", "]"}]}], ",", "Ax", ",", "Ay", ",", 
       "Az"}], "}"}], ",", "\[IndentingNewLine]", 
     RowBox[{"(*", 
      RowBox[{
       RowBox[{"While", "[", 
        RowBox[{
         RowBox[{
          RowBox[{"StringLength", "[", "str", "]"}], "<", "5"}], ",", 
         RowBox[{"str", "=", 
          RowBox[{"\"\<0\>\"", "<>", "str"}]}]}], "]"}], ";"}], "*)"}], 
     "\[IndentingNewLine]", 
     RowBox[{"(*", 
      RowBox[{
       RowBox[{"dump", "=."}], ";", 
       RowBox[{"ReadBinarySnapFiles", "[", 
        RowBox[{"\"\<dynamo_\>\"", ",", 
         RowBox[{"\"\<_\>\"", "<>", "str", "<>", "\"\<.snp\>\""}], ",", "5", 
         ",", "dump", ",", 
         RowBox[{"PrintInfo", "\[Rule]", "None"}]}], "]"}], ";"}], "*)"}], 
     "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"dump", "=."}], ";", 
      RowBox[{"ReadBinarySnapFile", "[", 
       RowBox[{
        RowBox[{"\"\<screw_4_\>\"", "<>", "str", "<>", "\"\<.snp\>\""}], ",", 
        "6", ",", "dump", ",", 
        RowBox[{"PrintInfo", "\[Rule]", "None"}]}], "]"}], ";", 
      "\[IndentingNewLine]", 
      RowBox[{"dump", "=", 
       RowBox[{"Take", "[", 
        RowBox[{"dump", ",", 
         RowBox[{"{", 
          RowBox[{"1", ",", 
           RowBox[{"-", "1"}]}], "}"}]}], "]"}]}], ";", "\[IndentingNewLine]", 
      RowBox[{"(*", 
       RowBox[{
        RowBox[{"Return", "[", 
         RowBox[{"Take", "[", 
          RowBox[{"dump", ",", "3"}], "]"}], "]"}], ";"}], "*)"}], 
      "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"coor", ",", "bounds"}], "}"}], "=", 
       RowBox[{"ReadAuxFiles", "[", 
        RowBox[{
         RowBox[{"{", "\"\<coord\>\"", "}"}], ",", 
         RowBox[{"ShiftVector", "\[Rule]", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"If", "[", 
             RowBox[{
              RowBox[{"\[Kappa]", ">", "0"}], ",", 
              FractionBox["1", "\[Kappa]"], ",", "0"}], "]"}], ",", "0", ",", 
            "0"}], "}"}]}]}], "]"}]}], ";", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"Ax", ",", "Ay", ",", "Az"}], "}"}], "=", 
       RowBox[{"Take", "[", 
        RowBox[{"dump", ",", 
         RowBox[{"-", "3"}]}], "]"}]}], ";", "\[IndentingNewLine]", 
      RowBox[{"If", "[", 
       RowBox[{"fluct", ",", "\[IndentingNewLine]", 
        RowBox[{
         RowBox[{"{", 
          RowBox[{"Ax", ",", "Ay", ",", "Az"}], "}"}], "-=", 
         RowBox[{"Transpose", "[", 
          RowBox[{
           RowBox[{"Table", "[", 
            RowBox[{
             RowBox[{
              RowBox[{"coor", "\[LeftDoubleBracket]", 
               RowBox[{"1", ",", "i"}], "\[RightDoubleBracket]"}], 
              RowBox[{"Cos", "[", 
               RowBox[{"coor", "\[LeftDoubleBracket]", 
                RowBox[{"2", ",", "j"}], "\[RightDoubleBracket]"}], "]"}], 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"Sin", "[", 
                 RowBox[{"coor", "\[LeftDoubleBracket]", 
                  RowBox[{"2", ",", "j"}], "\[RightDoubleBracket]"}], "]"}], 
                ",", 
                RowBox[{"Cos", "[", 
                 RowBox[{"coor", "\[LeftDoubleBracket]", 
                  RowBox[{"2", ",", "j"}], "\[RightDoubleBracket]"}], "]"}], 
                ",", "0"}], "}"}]}], ",", 
             RowBox[{"{", 
              RowBox[{"i", ",", "1", ",", 
               RowBox[{"n1", "+", 
                RowBox[{"2", "ghost"}]}]}], "}"}], ",", 
             RowBox[{"{", 
              RowBox[{"j", ",", "1", ",", 
               RowBox[{"n2", "+", 
                RowBox[{"2", "ghost"}]}]}], "}"}], ",", 
             RowBox[{"{", 
              RowBox[{"k", ",", "1", ",", 
               RowBox[{"n3", "+", 
                RowBox[{"2", "ghost"}]}]}], "}"}]}], "]"}], ",", 
           RowBox[{"{", 
            RowBox[{"2", ",", "3", ",", "4", ",", "1"}], "}"}]}], "]"}]}]}], 
       "]"}], ";", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{"Bx", ",", "By", ",", "Bz"}], "}"}], "=", 
       RowBox[{"rotd", "[", 
        RowBox[{"Ax", ",", "Ay", ",", "Az", ",", "ghost"}], "]"}]}], ";", 
      "\[IndentingNewLine]", 
      RowBox[{"(*", 
       RowBox[{
        RowBox[{
         RowBox[{"{", 
          RowBox[{"jx", ",", "jy", ",", "jz"}], "}"}], "=", 
         RowBox[{"rotc", "[", 
          RowBox[{"Bx", ",", "By", ",", "Bz", ",", "ghost"}], "]"}]}], ";"}], 
       "*)"}], "\[IndentingNewLine]", 
      RowBox[{"Return", "[", 
       RowBox[{"{", 
        RowBox[{"Bx", ",", "By", ",", "Bz"}], "}"}], "]"}], ";"}]}], "]"}]}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"ReadSection", "[", 
    RowBox[{"iter_", ",", 
     RowBox[{"\[Kappa]_Integer:", "0"}], ",", 
     RowBox[{"fluct_Symbol:", "False"}]}], "]"}], ":=", 
   RowBox[{"ReadSection", "[", 
    RowBox[{"iter", ",", 
     RowBox[{"\[Kappa]", "+", "0."}], ",", "fluct"}], "]"}]}], 
  ";"}]}], "Input",
 CellChangeTimes->{{3.3960307107679996`*^9, 3.3960307116689997`*^9}, 
   3.396030778356*^9, {3.396031094078*^9, 3.3960311485550003`*^9}, {
   3.3960311958190002`*^9, 3.3960312012720003`*^9}, {3.3960312806949997`*^9, 
   3.396031294561*^9}, {3.396031330314*^9, 3.3960313310220003`*^9}, {
   3.3960313636219997`*^9, 3.3960313671800003`*^9}, 3.3960374099514*^9, 
   3.409516121436*^9, {3.409516178874*^9, 3.409516254637*^9}, {
   3.409516359733*^9, 3.409516360144*^9}, {3.409596584605*^9, 
   3.409596607484*^9}, {3.411200379608*^9, 3.4112003813129997`*^9}, {
   3.46149559165625*^9, 3.461495633984375*^9}, {3.461496267234375*^9, 
   3.46149632821875*^9}, {3.48696575650611*^9, 3.486965782027715*^9}, 
   3.48696590640654*^9, {3.486965983439355*^9, 3.48696600882056*^9}, {
   3.486979512241255*^9, 3.486979520493656*^9}, {3.487056019664058*^9, 
   3.4870560197264585`*^9}, 3.48731206883294*^9, {3.490678811390625*^9, 
   3.49067884528125*^9}, {3.490678922078125*^9, 3.490678955296875*^9}, 
   3.49067900196875*^9, {3.49067916078125*^9, 3.49067916153125*^9}, {
   3.49067936521875*^9, 3.490679367984375*^9}, {3.490679439703125*^9, 
   3.49067944046875*^9}, {3.4906794758125*^9, 3.49067952153125*^9}, {
   3.490679609515625*^9, 3.49067961265625*^9}, {3.490679959484375*^9, 
   3.490679966953125*^9}, {3.490680324765625*^9, 3.4906803464375*^9}, {
   3.490682938671875*^9, 3.490682940171875*^9}, {3.49068737928125*^9, 
   3.490687379390625*^9}, {3.4906910784375*^9, 3.490691078484375*^9}, {
   3.49069236428125*^9, 3.490692370390625*^9}, {3.49069308928125*^9, 
   3.49069308934375*^9}, 3.4910468324207497`*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"grtot", "=", 
   RowBox[{"{", "}"}]}], ";"}]], "Input"],

Cell[BoxData[
 RowBox[{
  RowBox[{"nameexp", "=", "\"\<parker\>\""}], ";"}]], "Input"],

Cell[CellGroupData[{

Cell["\:041d\:0435\:0437\:0430\:0432\:0438\:0441\:0438\:043c\:044b\:0439 \
\:043a\:043e\:0434", "Text",
 CellGroupingRules->{GroupTogetherGrouping, 10000.},
 CellChangeTimes->{{3.491113191140625*^9, 3.49111320459375*^9}, 
   3.50074116075*^9}],

Cell[BoxData[
 RowBox[{"Block", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"g", ",", "dump"}], "}"}], ",", 
   RowBox[{
    RowBox[{"dump", "=", 
     RowBox[{"ReadList", "[", "\"\<runtest1.dmp\>\"", "]"}]}], ";", 
    RowBox[{"np", "=", 
     RowBox[{"dump", "\[LeftDoubleBracket]", "3", "\[RightDoubleBracket]"}]}],
     ";", 
    RowBox[{"KolProc", "=", 
     RowBox[{"Times", "@@", "np"}]}], ";", 
    RowBox[{"dump", "=", 
     RowBox[{"Drop", "[", 
      RowBox[{"dump", ",", 
       RowBox[{"{", "3", "}"}]}], "]"}]}], ";", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
      "t", ",", "count", ",", "n1", ",", "n2", ",", "n3", ",", "Rey"}], "}"}],
      "=", 
     RowBox[{"Take", "[", 
      RowBox[{"dump", ",", "6"}], "]"}]}], ";", 
    RowBox[{"dump", "=", 
     RowBox[{"Drop", "[", 
      RowBox[{"dump", ",", "6"}], "]"}]}], ";", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
      "pm", ",", "vxm", ",", "vym", ",", "vzm", ",", "Axm", ",", "Aym", ",", 
       "Azm", ",", "nutm"}], "}"}], "=", 
     RowBox[{"Transpose", "[", 
      RowBox[{"Partition", "[", 
       RowBox[{"dump", ",", "8"}], "]"}], "]"}]}], ";", 
    RowBox[{"ghost", "=", 
     RowBox[{
      FractionBox["1", 
       RowBox[{"2", " ", 
        RowBox[{"Last", "[", "np", "]"}]}]], 
      RowBox[{"(", 
       RowBox[{
        RowBox[{"Total", "[", 
         RowBox[{
          RowBox[{"(", 
           RowBox[{
            RowBox[{"Last", "[", 
             RowBox[{"Dimensions", "[", "#1", "]"}], "]"}], "&"}], ")"}], "/@", 
          RowBox[{"CutList", "[", 
           RowBox[{"pm", ",", 
            RowBox[{"Last", "[", "np", "]"}]}], "]"}]}], "]"}], "-", "n3"}], 
       ")"}]}]}], ";", 
    RowBox[{"coor", "=", 
     RowBox[{"ReadList", "[", 
      RowBox[{"\"\<coord\>\"", ",", "Number", ",", 
       RowBox[{"RecordLists", "\[Rule]", "True"}]}], "]"}]}], ";", 
    RowBox[{"bounds", "=", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
          RowBox[{
           FractionBox["1", "2"], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{
             "#1", "\[LeftDoubleBracket]", "ghost", "\[RightDoubleBracket]"}],
              "+", 
             RowBox[{"#1", "\[LeftDoubleBracket]", 
              RowBox[{"ghost", "+", "1"}], "\[RightDoubleBracket]"}]}], 
            ")"}]}], ",", 
          RowBox[{
           FractionBox["1", "2"], " ", 
           RowBox[{"(", 
            RowBox[{
             RowBox[{"#1", "\[LeftDoubleBracket]", 
              RowBox[{"-", "ghost"}], "\[RightDoubleBracket]"}], "+", 
             RowBox[{"#1", "\[LeftDoubleBracket]", 
              RowBox[{
               RowBox[{"-", "ghost"}], "-", "1"}], 
              "\[RightDoubleBracket]"}]}], ")"}]}]}], "}"}], "&"}], ")"}], "/@",
       "coor"}]}], ";", 
    RowBox[{"Ax", "=", 
     RowBox[{"First", "[", 
      RowBox[{"Fold", "[", 
       RowBox[{
        RowBox[{
         RowBox[{"Map", "[", 
          RowBox[{
           RowBox[{"Function", "[", 
            RowBox[{"m", ",", 
             RowBox[{"Clue", "[", 
              RowBox[{"m", ",", "#2", ",", "ghost"}], "]"}]}], "]"}], ",", 
           RowBox[{"Partition", "[", 
            RowBox[{"#1", ",", 
             RowBox[{
             "np", "\[LeftDoubleBracket]", "#2", "\[RightDoubleBracket]"}]}], 
            "]"}], ",", 
           RowBox[{"{", "1", "}"}]}], "]"}], "&"}], ",", "Axm", ",", 
        RowBox[{"{", 
         RowBox[{"1", ",", "2", ",", "3"}], "}"}]}], "]"}], "]"}]}], ";", 
    RowBox[{"Ay", "=", 
     RowBox[{"First", "[", 
      RowBox[{"Fold", "[", 
       RowBox[{
        RowBox[{
         RowBox[{"Map", "[", 
          RowBox[{
           RowBox[{"Function", "[", 
            RowBox[{"m", ",", 
             RowBox[{"Clue", "[", 
              RowBox[{"m", ",", "#2", ",", "ghost"}], "]"}]}], "]"}], ",", 
           RowBox[{"Partition", "[", 
            RowBox[{"#1", ",", 
             RowBox[{
             "np", "\[LeftDoubleBracket]", "#2", "\[RightDoubleBracket]"}]}], 
            "]"}], ",", 
           RowBox[{"{", "1", "}"}]}], "]"}], "&"}], ",", "Aym", ",", 
        RowBox[{"{", 
         RowBox[{"1", ",", "2", ",", "3"}], "}"}]}], "]"}], "]"}]}], ";", 
    RowBox[{"Az", "=", 
     RowBox[{"First", "[", 
      RowBox[{"Fold", "[", 
       RowBox[{
        RowBox[{
         RowBox[{"Map", "[", 
          RowBox[{
           RowBox[{"Function", "[", 
            RowBox[{"m", ",", 
             RowBox[{"Clue", "[", 
              RowBox[{"m", ",", "#2", ",", "ghost"}], "]"}]}], "]"}], ",", 
           RowBox[{"Partition", "[", 
            RowBox[{"#1", ",", 
             RowBox[{
             "np", "\[LeftDoubleBracket]", "#2", "\[RightDoubleBracket]"}]}], 
            "]"}], ",", 
           RowBox[{"{", "1", "}"}]}], "]"}], "&"}], ",", "Azm", ",", 
        RowBox[{"{", 
         RowBox[{"1", ",", "2", ",", "3"}], "}"}]}], "]"}], "]"}]}], ";", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"Ax", ",", "Ay", ",", "Az"}], "}"}], "-=", 
     RowBox[{"Transpose", "[", 
      RowBox[{
       RowBox[{"Table", "[", 
        RowBox[{
         RowBox[{
          RowBox[{"coor", "\[LeftDoubleBracket]", 
           RowBox[{"1", ",", "i"}], "\[RightDoubleBracket]"}], " ", 
          RowBox[{"Cos", "[", 
           RowBox[{"coor", "\[LeftDoubleBracket]", 
            RowBox[{"2", ",", "j"}], "\[RightDoubleBracket]"}], "]"}], " ", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"Sin", "[", 
             RowBox[{"coor", "\[LeftDoubleBracket]", 
              RowBox[{"2", ",", "j"}], "\[RightDoubleBracket]"}], "]"}], ",", 
            RowBox[{"Cos", "[", 
             RowBox[{"coor", "\[LeftDoubleBracket]", 
              RowBox[{"2", ",", "j"}], "\[RightDoubleBracket]"}], "]"}], ",", 
            "0"}], "}"}]}], ",", 
         RowBox[{"{", 
          RowBox[{"i", ",", "1", ",", 
           RowBox[{"n1", "+", 
            RowBox[{"2", " ", "ghost"}]}]}], "}"}], ",", 
         RowBox[{"{", 
          RowBox[{"j", ",", "1", ",", 
           RowBox[{"n2", "+", 
            RowBox[{"2", " ", "ghost"}]}]}], "}"}], ",", 
         RowBox[{"{", 
          RowBox[{"k", ",", "1", ",", 
           RowBox[{"n3", "+", 
            RowBox[{"2", " ", "ghost"}]}]}], "}"}]}], "]"}], ",", 
       RowBox[{"{", 
        RowBox[{"2", ",", "3", ",", "4", ",", "1"}], "}"}]}], "]"}]}], ";", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"Bx", ",", "By", ",", "Bz"}], "}"}], "=", 
     RowBox[{"rotc", "[", 
      RowBox[{"Ax", ",", "Ay", ",", "Az", ",", "ghost"}], "]"}]}], ";", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"jx", ",", "jy", ",", "jz"}], "}"}], "=", 
     RowBox[{"rotc", "[", 
      RowBox[{"Bx", ",", "By", ",", "Bz", ",", "ghost"}], "]"}]}], ";", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
      "Bxi", ",", "Byi", ",", "Bzi", ",", "jxi", ",", "jyi", ",", "jzi"}], 
      "}"}], "=", 
     RowBox[{
      RowBox[{"(", 
       RowBox[{
        RowBox[{"ListInterpolation", "[", 
         RowBox[{"#1", ",", 
          RowBox[{"{", 
           RowBox[{
            RowBox[{"{", 
             RowBox[{
              RowBox[{"Min", "[", 
               RowBox[{
               "coor", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}],
                "]"}], ",", 
              RowBox[{"Max", "[", 
               RowBox[{
               "coor", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}],
                "]"}]}], "}"}], ",", 
            RowBox[{"{", 
             RowBox[{
              RowBox[{"Min", "[", 
               RowBox[{
               "coor", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}],
                "]"}], ",", 
              RowBox[{"Max", "[", 
               RowBox[{
               "coor", "\[LeftDoubleBracket]", "2", "\[RightDoubleBracket]"}],
                "]"}]}], "}"}], ",", 
            RowBox[{"{", 
             RowBox[{
              RowBox[{"Min", "[", 
               RowBox[{
               "coor", "\[LeftDoubleBracket]", "3", "\[RightDoubleBracket]"}],
                "]"}], ",", 
              RowBox[{"Max", "[", 
               RowBox[{
               "coor", "\[LeftDoubleBracket]", "3", "\[RightDoubleBracket]"}],
                "]"}]}], "}"}]}], "}"}], ",", 
          RowBox[{"InterpolationOrder", "\[Rule]", "1"}]}], "]"}], "&"}], 
       ")"}], "/@", 
      RowBox[{"{", 
       RowBox[{"Bx", ",", "By", ",", "Bz", ",", "jx", ",", "jy", ",", "jz"}], 
       "}"}]}]}], ";", 
    RowBox[{"g", "=", 
     RowBox[{"GraphicsRow", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"SectionRZ", "[", 
          RowBox[{"Bxi", ",", "Byi", ",", "Bzi", ",", 
           RowBox[{"0.2`", " ", "\[Pi]"}]}], "]"}], ",", 
         RowBox[{"SectionR\[CapitalPhi]", "[", 
          RowBox[{"Bxi", ",", "Byi", ",", "Bzi", ",", 
           RowBox[{"Mean", "[", 
            RowBox[{
            "bounds", "\[LeftDoubleBracket]", "3", "\[RightDoubleBracket]"}], 
            "]"}]}], "]"}], ",", 
         RowBox[{"Section\[CapitalPhi]Z", "[", 
          RowBox[{"Bxi", ",", "Byi", ",", "Bzi", ",", 
           RowBox[{"Mean", "[", 
            RowBox[{
            "bounds", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], 
            "]"}]}], "]"}]}], "}"}], ",", 
       RowBox[{"Spacings", "\[Rule]", 
        RowBox[{"Scaled", "[", "0.`", "]"}]}], ",", 
       RowBox[{"PlotLabel", "\[Rule]", 
        RowBox[{"\"\<t=\>\"", "<>", 
         RowBox[{"ToString", "[", "t", "]"}]}]}]}], "]"}]}], ";", 
    "\[IndentingNewLine]", 
    RowBox[{"fname", "=", 
     RowBox[{"nameexp", "<>", "\"\<0000.gif\>\""}]}], ";", 
    "\[IndentingNewLine]", 
    RowBox[{"Export", "[", 
     RowBox[{"fname", ",", "g", ",", 
      RowBox[{"ImageResolution", "\[Rule]", "300"}], ",", 
      RowBox[{"ImageSize", "\[Rule]", "640"}]}], "]"}], ";"}]}], 
  "]"}]], "Input",
 CellGroupingRules->{GroupTogetherGrouping, 10000.},
 CellChangeTimes->{{3.396031741926*^9, 3.3960317709300003`*^9}, 
   3.491113246046875*^9, 3.50074116075*^9}]
}, Open  ]],

Cell[BoxData[{
 RowBox[{
  RowBox[{"ReadSectionDraw2File", "[", 
   RowBox[{"16522", ",", "0.75"}], "]"}], 
  ";"}], "\[IndentingNewLine]", "g1"}], "Input",
 CellChangeTimes->{{3.487491290415031*^9, 3.4874913526278434`*^9}, {
   3.487491520125077*^9, 3.4874915340558796`*^9}, {3.4874918613283443`*^9, 
   3.487491861874345*^9}, {3.487492228209217*^9, 3.4874922283028173`*^9}, {
   3.4874922972548313`*^9, 3.487492301232832*^9}, 3.4874925971960907`*^9, 
   3.487492705647312*^9, {3.4874927799501266`*^9, 3.4874927810889273`*^9}, {
   3.4874929288365564`*^9, 3.4874929299441566`*^9}, {3.487492974903366*^9, 
   3.487492975402566*^9}, {3.487493608279092*^9, 3.4874936087782917`*^9}, {
   3.49067912665625*^9, 3.490679138375*^9}, {3.49068058471875*^9, 
   3.490680590375*^9}, 3.490680621078125*^9, {3.490681479421875*^9, 
   3.490681481640625*^9}, {3.490683001140625*^9, 3.4906830016875*^9}, {
   3.490684582953125*^9, 3.4906845849375*^9}, {3.4906848705*^9, 
   3.49068487240625*^9}, {3.49068496625*^9, 3.490684968109375*^9}, {
   3.4906850164375*^9, 3.490685018421875*^9}, {3.490685112796875*^9, 
   3.49068511434375*^9}, {3.490685194484375*^9, 3.490685196109375*^9}, {
   3.490685250484375*^9, 3.490685252578125*^9}, {3.4906853770625*^9, 
   3.490685378375*^9}, {3.4906854308125*^9, 3.49068543478125*^9}, {
   3.49068558640625*^9, 3.49068559165625*^9}, {3.49068580471875*^9, 
   3.49068580628125*^9}, {3.490686037515625*^9, 3.490686038890625*^9}, {
   3.4906860893125*^9, 3.490686091546875*^9}, {3.490686158203125*^9, 
   3.490686159484375*^9}, {3.490686245140625*^9, 3.490686246546875*^9}, {
   3.49068634634375*^9, 3.490686352875*^9}, {3.4906864514375*^9, 
   3.49068645303125*^9}, {3.49068649609375*^9, 3.49068649709375*^9}, {
   3.490687381953125*^9, 3.490687383578125*^9}, {3.490687478140625*^9, 
   3.490687478734375*^9}, {3.490687722453125*^9, 3.4906877386875*^9}, {
   3.49068803021875*^9, 3.490688032140625*^9}, {3.49068821375*^9, 
   3.490688214203125*^9}, {3.49068837871875*^9, 3.490688379109375*^9}, {
   3.490688446109375*^9, 3.490688446984375*^9}, {3.490688781390625*^9, 
   3.490688784203125*^9}, {3.49068899315625*^9, 3.490688996546875*^9}, {
   3.4906892468125*^9, 3.490689248296875*^9}, {3.49068945034375*^9, 
   3.490689451828125*^9}, {3.490689798375*^9, 3.490689799921875*^9}, {
   3.490692354453125*^9, 3.490692374109375*^9}, {3.490693081421875*^9, 
   3.49069308490625*^9}, {3.49069320215625*^9, 3.490693207734375*^9}, {
   3.490693251578125*^9, 3.490693251859375*^9}, {3.490693315390625*^9, 
   3.49069331825*^9}, {3.49069348490625*^9, 3.490693486796875*^9}, {
   3.49069352709375*^9, 3.490693533703125*^9}, {3.4906938916875*^9, 
   3.4906938933125*^9}, {3.490693962375*^9, 3.49069396425*^9}, {
   3.490694064328125*^9, 3.490694067921875*^9}, {3.49069413421875*^9, 
   3.49069413665625*^9}, {3.49069420553125*^9, 3.490694206171875*^9}, {
   3.490694284671875*^9, 3.490694285109375*^9}, {3.49069437771875*^9, 
   3.490694379890625*^9}, {3.4906944719375*^9, 3.490694473671875*^9}, {
   3.490694618203125*^9, 3.490694618875*^9}, {3.490694760953125*^9, 
   3.490694763046875*^9}, {3.490694857*^9, 3.4906948588125*^9}, {
   3.49069502675*^9, 3.490695028875*^9}, {3.49069514459375*^9, 
   3.49069514725*^9}, {3.490695186109375*^9, 3.490695195359375*^9}, {
   3.490695367375*^9, 3.490695368015625*^9}, {3.49069554890625*^9, 
   3.4906955523125*^9}, {3.490695592046875*^9, 3.490695592765625*^9}, {
   3.490695708390625*^9, 3.490695710453125*^9}, {3.4906967785*^9, 
   3.4906967806875*^9}, {3.490696971953125*^9, 3.4906969743125*^9}, {
   3.49069709053125*^9, 3.490697092203125*^9}, {3.49069724175*^9, 
   3.490697243296875*^9}, {3.490697357375*^9, 3.49069735875*^9}, {
   3.490697478265625*^9, 3.490697480046875*^9}, {3.490697575015625*^9, 
   3.490697576625*^9}, {3.49069778859375*^9, 3.490697791*^9}, {
   3.490698163734375*^9, 3.4906981659375*^9}, {3.49069852690625*^9, 
   3.49069852765625*^9}, {3.49069886559375*^9, 3.49069888478125*^9}, {
   3.490698999515625*^9, 3.490699001796875*^9}, {3.490699242484375*^9, 
   3.490699245140625*^9}, {3.49069953771875*^9, 3.49069953925*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"ReadSectionDraw2File", "[", 
   RowBox[{"iter_", ",", 
    RowBox[{"\[Kappa]_:", "0"}]}], "]"}], ":=", 
  RowBox[{"Block", "[", 
   RowBox[{
    RowBox[{"{", "fname", "}"}], ",", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{
      RowBox[{"{", 
       RowBox[{"Bx", ",", "By", ",", "Bz"}], "}"}], "=", 
      RowBox[{"ReadSection", "[", 
       RowBox[{"iter", ",", "\[Kappa]"}], "]"}]}], ";", "\[IndentingNewLine]", 
     RowBox[{
      RowBox[{"{", 
       RowBox[{"coor", ",", "bounds"}], "}"}], "=", 
      RowBox[{"ReadAuxFiles", "[", 
       RowBox[{
        RowBox[{"{", "\"\<coord\>\"", "}"}], ",", 
        RowBox[{"ShiftVector", "\[Rule]", 
         RowBox[{"{", 
          RowBox[{"0", ",", "0", ",", "0"}], "}"}]}]}], "]"}]}], ";", 
     "\[IndentingNewLine]", 
     RowBox[{"g1", "=", 
      RowBox[{"DrawSection", "[", 
       RowBox[{"Bx", ",", "By", ",", "Bz"}], "]"}]}], ";", 
     "\[IndentingNewLine]", 
     RowBox[{"fname", "=", 
      RowBox[{"\"\<(\>\"", "<>", 
       RowBox[{"ToString", "[", "\[Kappa]", "]"}], "<>", "\"\<)screw\>\"", "<>", 
       RowBox[{"ToString", "[", "iter", "]"}], "<>", "\"\<_B.gif\>\""}]}], 
     ";", "\[IndentingNewLine]", 
     RowBox[{"Export", "[", 
      RowBox[{"fname", ",", "g1", ",", 
       RowBox[{"ImageResolution", "\[Rule]", "300"}], ",", 
       RowBox[{"ImageSize", "\[Rule]", "640"}]}], "]"}], ";"}]}], 
   "\[IndentingNewLine]", "]"}]}]], "Input",
 CellChangeTimes->{{3.487491411018655*^9, 3.4874915083314743`*^9}, {
  3.4874915954730916`*^9, 3.4874916089046946`*^9}, {3.490678798703125*^9, 
  3.49067880753125*^9}, {3.49067897590625*^9, 3.49067899596875*^9}, {
  3.49068529796875*^9, 3.4906853141875*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"nums", "=", 
  RowBox[{"Union", "[", 
   RowBox[{
    RowBox[{
     RowBox[{"ToExpression", "[", 
      RowBox[{"First", "[", 
       RowBox[{"StringCases", "[", 
        RowBox[{"#", ",", 
         RowBox[{
          RowBox[{
          "RegularExpression", "[", 
           "\"\<([^_]+?)_([^_]+?)_([^\\\\.]+?)\\\\.(.*?)\>\"", "]"}], 
          "\[Rule]", "\"\<$3\>\""}]}], "]"}], "]"}], "]"}], "&"}], "/@", 
    RowBox[{"FileNames", "[", "\"\<*.snp\>\"", "]"}]}], "]"}]}]], "Input",
 CellChangeTimes->{{3.3960318271870003`*^9, 3.396032011225*^9}, {
  3.4095162687869997`*^9, 3.40951627287*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "1880", ",", "1883", ",", "3728", ",", "5571", ",", "7430", ",", "9285", 
   ",", "11143", ",", "13005", ",", "14874", ",", "16734", ",", "18590", ",", 
   "20451", ",", "22309", ",", "24176", ",", "26039", ",", "27910", ",", 
   "29758", ",", "31615", ",", "33471", ",", "35334", ",", "37200"}], 
  "}"}]], "Output",
 CellChangeTimes->{{3.461495642609375*^9, 3.461495670703125*^9}, 
   3.461496350125*^9, 3.487317382841125*^9, 3.487317717934875*^9, 
   3.490691037328125*^9, {3.4906925666875*^9, 3.49069258146875*^9}, 
   3.49069629046875*^9, 3.4910467775457497`*^9, 3.4910475392801247`*^9, 
   3.4910476630144997`*^9, 3.4910481930144997`*^9, 3.4910563054832497`*^9, 
   3.4910595282019997`*^9, 3.4910668235457497`*^9, 3.4910672485613747`*^9, {
   3.4910685663113747`*^9, 3.4910685676863747`*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"ReadSection", "[", 
   RowBox[{"nums", "[", 
    RowBox[{"[", "1", "]"}], "]"}], "]"}], "//", "Dimensions"}]], "Input",
 CellChangeTimes->{{3.487317391184875*^9, 3.487317396763*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"3", ",", "70", ",", "38", ",", "70"}], "}"}]], "Output",
 CellChangeTimes->{{3.48731739741925*^9, 3.487317408888*^9}, {
   3.487317439872375*^9, 3.487317467122375*^9}, 3.48731750160675*^9, {
   3.487317546138*^9, 3.487317560513*^9}, 3.48731772210675*^9, 
   3.48731776435675*^9, 3.487317807809875*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"infos", "=", "ScanSnaps"}], ";"}]], "Input",
 CellChangeTimes->{3.453621419109375*^9}],

Cell[CellGroupData[{

Cell[BoxData[
 InterpretationBox[
  RowBox[{"\<\"\:0421\:0435\:0442\:043a\:0430 \:043e\:0434\:0438\:043d\:0430\
\:043a\:043e\:0432\:0430\:044f: \"\>", "\[InvisibleSpace]", 
   RowBox[{"{", 
    RowBox[{"64", ",", "32", ",", "64"}], "}"}]}],
  SequenceForm[
  "\:0421\:0435\:0442\:043a\:0430 \:043e\:0434\:0438\:043d\:0430\:043a\:043e\
\:0432\:0430\:044f: ", {64, 32, 64}],
  Editable->False]], "Print",
 CellChangeTimes->{3.48731738710675*^9, 3.487317810028625*^9, 
  3.490691053984375*^9, 3.49069258025*^9, 3.49069629271875*^9}],

Cell[BoxData[
 InterpretationBox[
  RowBox[{"\<\"\:0414\:0435\:043b\:0435\:043d\:0438\:0435 \:043d\:0430 \:043f\
\:0440\:043e\:0446\:0435\:0441\:0441\:044b \:043e\:0434\:0438\:043d\:0430\
\:043a\:043e\:0432\:043e\:0435: \"\>", "\[InvisibleSpace]", 
   RowBox[{"{", 
    RowBox[{"4", ",", "2", ",", "8"}], "}"}]}],
  SequenceForm[
  "\:0414\:0435\:043b\:0435\:043d\:0438\:0435 \:043d\:0430 \:043f\:0440\:043e\
\:0446\:0435\:0441\:0441\:044b \:043e\:0434\:0438\:043d\:0430\:043a\:043e\
\:0432\:043e\:0435: ", {4, 2, 8}],
  Editable->False]], "Print",
 CellChangeTimes->{3.48731738710675*^9, 3.487317810028625*^9, 
  3.490691053984375*^9, 3.49069258025*^9, 3.490696292734375*^9}],

Cell[BoxData["\<\"\:0421\:0442\:0440\:0443\:043a\:0442\:0443\:0440\:0430 \
\:0443 \:0432\:0441\:0435\:0445 \:043e\:0434\:0438\:043d\:0430\:043a\:043e\
\:0432\:0430\:044f\"\>"], "Print",
 CellChangeTimes->{3.48731738710675*^9, 3.487317810028625*^9, 
  3.490691053984375*^9, 3.49069258025*^9, 3.490696292734375*^9}]
}, Open  ]]
}, Open  ]],

Cell[BoxData[
 RowBox[{"infos", "[", 
  RowBox[{"[", "1", "]"}], "]"}]], "Input",
 CellChangeTimes->{{3.4536214823125*^9, 3.45362148434375*^9}, {
  3.45916215559375*^9, 3.4591621639375*^9}}],

Cell[BoxData[
 RowBox[{"PrintRange", "[", 
  RowBox[{"Sort", "@", 
   RowBox[{"infos", "[", 
    RowBox[{"[", 
     RowBox[{"All", ",", "3"}], "]"}], "]"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.4536214215*^9, 3.45362149459375*^9}}],

Cell[BoxData[{
 RowBox[{
  RowBox[{"lf1", "=", 
   RowBox[{"lf2", "=", 
    RowBox[{"lf3", "=", 
     RowBox[{"lf4", "=", 
      RowBox[{"lf5", "=", 
       RowBox[{"{", "}"}]}]}]}]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"Monitor", "[", 
   RowBox[{
    RowBox[{"Do", "[", 
     RowBox[{
      RowBox[{"Block", "[", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
         "Bx", ",", "By", ",", "Bz", ",", "g1", ",", "g2", ",", "fname"}], 
         "}"}], ",", "\[IndentingNewLine]", 
        RowBox[{
         RowBox[{
          RowBox[{"{", 
           RowBox[{"Bx", ",", "By", ",", "Bz"}], "}"}], "=", 
          RowBox[{"ReadSection", "[", 
           RowBox[{
           "nums", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], 
           "]"}]}], ";", "\[IndentingNewLine]", 
         RowBox[{"(*", 
          RowBox[{
           RowBox[{"Print", "[", 
            RowBox[{"\"\<have read ponom_\>\"", "<>", 
             RowBox[{"ToString", "[", 
              RowBox[{
              "nums", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], 
              "]"}], "<>", "\"\<.snp\>\""}], "]"}], ";"}], "*)"}], 
         "\[IndentingNewLine]", 
         RowBox[{"AppendTo", "[", 
          RowBox[{"lf1", ",", 
           RowBox[{"Fourier", "@", 
            RowBox[{"WithoutFict", "@", 
             RowBox[{"Bx", "\[LeftDoubleBracket]", 
              RowBox[{"15", ",", "All", ",", "15"}], 
              "\[RightDoubleBracket]"}]}]}]}], "]"}], ";", 
         "\[IndentingNewLine]", 
         RowBox[{"AppendTo", "[", 
          RowBox[{"lf2", ",", 
           RowBox[{"Fourier", "@", 
            RowBox[{"(", 
             RowBox[{
              RowBox[{
               RowBox[{"Total", "[", 
                RowBox[{"Flatten", "[", 
                 SuperscriptBox["#", "2"], "]"}], "]"}], "&"}], "/@", 
              RowBox[{"Transpose", "[", 
               RowBox[{
                RowBox[{"WithoutFict", "@", "Bx"}], ",", 
                RowBox[{"{", 
                 RowBox[{"2", ",", "1", ",", "3"}], "}"}]}], "]"}]}], 
             ")"}]}]}], "]"}], ";", "\[IndentingNewLine]", 
         RowBox[{"AppendTo", "[", 
          RowBox[{"lf3", ",", 
           RowBox[{"Fourier", "@", 
            RowBox[{"(", 
             RowBox[{
              RowBox[{
               RowBox[{"Total", "[", 
                RowBox[{"Flatten", "[", 
                 SuperscriptBox["#", "2"], "]"}], "]"}], "&"}], "/@", 
              RowBox[{"Transpose", "[", 
               RowBox[{
                RowBox[{"WithoutFict", "@", "By"}], ",", 
                RowBox[{"{", 
                 RowBox[{"2", ",", "1", ",", "3"}], "}"}]}], "]"}]}], 
             ")"}]}]}], "]"}], ";", 
         RowBox[{"AppendTo", "[", 
          RowBox[{"lf4", ",", 
           RowBox[{"Fourier", "@", 
            RowBox[{"(", 
             RowBox[{
              RowBox[{
               RowBox[{"Total", "[", 
                RowBox[{"Flatten", "[", 
                 SuperscriptBox["#", "2"], "]"}], "]"}], "&"}], "/@", 
              RowBox[{"Transpose", "[", 
               RowBox[{
                RowBox[{"WithoutFict", "@", "Bz"}], ",", 
                RowBox[{"{", 
                 RowBox[{"2", ",", "1", ",", "3"}], "}"}]}], "]"}]}], 
             ")"}]}]}], "]"}], ";"}]}], "\[IndentingNewLine]", "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"i", ",", "1", ",", 
        RowBox[{"Length", "[", "nums", "]"}]}], "}"}]}], "]"}], ",", 
    RowBox[{"nums", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}]}], 
   "]"}], ";"}]}], "Input",
 CellChangeTimes->{{3.396032024591*^9, 3.396032164275*^9}, {
   3.3960322161429996`*^9, 3.3960322768190002`*^9}, {3.396032432408*^9, 
   3.396032462848*^9}, {3.396032611528*^9, 3.396032650554*^9}, {
   3.396032681407*^9, 3.396032709755*^9}, {3.39603287658*^9, 
   3.396032879454*^9}, {3.396032925429*^9, 3.396032970593*^9}, {
   3.3960366123389997`*^9, 3.3960366143514*^9}, {3.3960407469418*^9, 
   3.3960407573782*^9}, {3.4095162825*^9, 3.409516371366*^9}, {
   3.409516435663*^9, 3.4095164367790003`*^9}, {3.409516871859*^9, 
   3.4095168854630003`*^9}, {3.409518749895*^9, 3.409518779932*^9}, {
   3.409518897043*^9, 3.4095189206940002`*^9}, {3.4095574024440002`*^9, 
   3.409557443428*^9}, {3.409557504564*^9, 3.409557505132*^9}, {
   3.4111958154890003`*^9, 3.4111958830889997`*^9}, 3.4112032257539997`*^9, {
   3.4185414982595634`*^9, 3.418541510526563*^9}, {3.4185415556695633`*^9, 
   3.418541606366563*^9}, {3.418541734930563*^9, 3.418541744356563*^9}, {
   3.4185418897055635`*^9, 3.4185419023995633`*^9}, {3.418541942824563*^9, 
   3.418541944692563*^9}, {3.418541978357563*^9, 3.4185419787785635`*^9}}],

Cell[BoxData[
 RowBox[{"Manipulate", "[", 
  RowBox[{
   RowBox[{"ListLogPlot", "[", 
    RowBox[{
     RowBox[{"Take", "[", 
      RowBox[{
       RowBox[{"Abs", "@", 
        RowBox[{
        "lf1", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}]}], ",", 
       "15"}], "]"}], ",", 
     RowBox[{"PlotRange", "\[Rule]", 
      RowBox[{"{", 
       RowBox[{
        SuperscriptBox["10", 
         RowBox[{"-", "20"}]], ",", 
        SuperscriptBox["10", "5"]}], "}"}]}], ",", 
     RowBox[{"PlotLabel", "\[Rule]", 
      RowBox[{"infos", "[", 
       RowBox[{"[", "i", "]"}], "]"}]}]}], "]"}], ",", 
   RowBox[{"{", 
    RowBox[{"i", ",", "1", ",", 
     RowBox[{"Length", "[", "nums", "]"}], ",", "1"}], "}"}]}], 
  "]"}]], "Input",
 CellChangeTimes->{{3.453621240609375*^9, 3.453621279859375*^9}, {
   3.453621311046875*^9, 3.453621358984375*^9}, {3.453621891859375*^9, 
   3.45362190565625*^9}, {3.453622039390625*^9, 3.453622073078125*^9}, {
   3.45362211253125*^9, 3.453622120140625*^9}, {3.4536221554375*^9, 
   3.453622166734375*^9}, 3.45362223225*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"Monitor", "[", 
   RowBox[{
    RowBox[{"Do", "[", 
     RowBox[{
      RowBox[{"Block", "[", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{
         "Bx", ",", "By", ",", "Bz", ",", "jx", ",", "jy", ",", "jz", ",", 
          "g1", ",", "g2", ",", "fname"}], "}"}], ",", "\[IndentingNewLine]", 
        RowBox[{
         RowBox[{
          RowBox[{"{", 
           RowBox[{"Bx", ",", "By", ",", "Bz"}], "}"}], "=", 
          RowBox[{"ReadSection", "[", 
           RowBox[{
            RowBox[{
            "nums", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], 
            ",", "0.25"}], "]"}]}], ";", "\[IndentingNewLine]", 
         RowBox[{"(*", 
          RowBox[{
           RowBox[{
            RowBox[{"{", 
             RowBox[{"jx", ",", "jy", ",", "jz"}], "}"}], "=", 
            RowBox[{"rotc", "[", 
             RowBox[{"Bx", ",", "By", ",", "Bz", ",", "3"}], "]"}]}], ";"}], 
          "*)"}], "\[IndentingNewLine]", 
         RowBox[{"(*", 
          RowBox[{
           RowBox[{"Print", "[", 
            RowBox[{"\"\<have read ponom_\>\"", "<>", 
             RowBox[{"ToString", "[", 
              RowBox[{
              "nums", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], 
              "]"}], "<>", "\"\<.snp\>\""}], "]"}], ";"}], "*)"}], 
         "\[IndentingNewLine]", 
         RowBox[{"g1", "=", 
          RowBox[{"DrawSection", "[", 
           RowBox[{"Bx", ",", "By", ",", "Bz"}], "]"}]}], ";", 
         "\[IndentingNewLine]", 
         RowBox[{"fname", "=", 
          RowBox[{"\"\<screw\>\"", "<>", 
           RowBox[{"ToString", "[", 
            RowBox[{
            "nums", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], 
            "]"}], "<>", "\"\<_B.gif\>\""}]}], ";", "\[IndentingNewLine]", 
         RowBox[{"Export", "[", 
          RowBox[{"fname", ",", "g1", ",", 
           RowBox[{"ImageResolution", "\[Rule]", "300"}], ",", 
           RowBox[{"ImageSize", "\[Rule]", "640"}]}], "]"}], ";"}]}], 
       "\[IndentingNewLine]", 
       RowBox[{"(*", 
        RowBox[{
         RowBox[{"g2", "=", 
          RowBox[{"DrawSection", "[", 
           RowBox[{"jx", ",", "jy", ",", "jz"}], "]"}]}], ";", 
         "\[IndentingNewLine]", 
         RowBox[{"fname", "=", 
          RowBox[{"\"\<ponom\>\"", "<>", 
           RowBox[{"ToString", "[", 
            RowBox[{
            "nums", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], 
            "]"}], "<>", "\"\<_j.gif\>\""}]}], ";", "\[IndentingNewLine]", 
         RowBox[{"Export", "[", 
          RowBox[{"fname", ",", "g2", ",", 
           RowBox[{"ImageResolution", "\[Rule]", "300"}], ",", 
           RowBox[{"ImageSize", "\[Rule]", "640"}]}], "]"}], ";"}], "*)"}], 
       "\[IndentingNewLine]", "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"i", ",", "1", ",", 
        RowBox[{"Length", "[", "nums", "]"}]}], "}"}]}], "]"}], ",", 
    RowBox[{"nums", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}]}], 
   "]"}], ";"}]], "Input",
 CellChangeTimes->{{3.396032024591*^9, 3.396032164275*^9}, {
   3.3960322161429996`*^9, 3.3960322768190002`*^9}, {3.396032432408*^9, 
   3.396032462848*^9}, {3.396032611528*^9, 3.396032650554*^9}, {
   3.396032681407*^9, 3.396032709755*^9}, {3.39603287658*^9, 
   3.396032879454*^9}, {3.396032925429*^9, 3.396032970593*^9}, {
   3.3960366123389997`*^9, 3.3960366143514*^9}, {3.3960407469418*^9, 
   3.3960407573782*^9}, {3.4095162825*^9, 3.409516371366*^9}, {
   3.409516435663*^9, 3.4095164367790003`*^9}, {3.409516871859*^9, 
   3.4095168854630003`*^9}, {3.409518749895*^9, 3.409518779932*^9}, {
   3.409518897043*^9, 3.4095189206940002`*^9}, {3.4095574024440002`*^9, 
   3.409557443428*^9}, {3.409557504564*^9, 3.409557505132*^9}, {
   3.4111958154890003`*^9, 3.4111958830889997`*^9}, 3.4112032257539997`*^9, {
   3.486966069379772*^9, 3.4869660879125757`*^9}, {3.4906910594375*^9, 
   3.49069106009375*^9}, {3.490692591953125*^9, 3.490692592078125*^9}, {
   3.490696298203125*^9, 3.490696298375*^9}, 3.4910481894832497`*^9, {
   3.4910595318113747`*^9, 3.4910595318894997`*^9}, {3.4910668264519997`*^9, 
   3.4910668265301247`*^9}, {3.4910672550301247`*^9, 3.4910672554519997`*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"res", "=", 
   RowBox[{"{", "}"}]}], ";", 
  RowBox[{"Monitor", "[", 
   RowBox[{
    RowBox[{"Do", "[", 
     RowBox[{
      RowBox[{"AppendTo", "[", 
       RowBox[{"res", ",", 
        RowBox[{"ReadSection", "[", 
         RowBox[{
          RowBox[{
          "nums", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], ",",
           "nproc"}], "]"}]}], "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"i", ",", 
        RowBox[{"Length", "[", "nums", "]"}]}], "}"}]}], "]"}], ",", 
    RowBox[{"nums", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}]}], 
   "]"}]}]], "Input",
 CellChangeTimes->{{3.428221763703125*^9, 3.428221767546875*^9}, {
   3.428221849*^9, 3.4282219504375*^9}, {3.43200628800287*^9, 
   3.43200632558327*^9}, {3.4320063812908697`*^9, 3.43200642035327*^9}, {
   3.43200668839327*^9, 3.4320066920436697`*^9}, 3.4320068530356703`*^9, {
   3.4322761868780003`*^9, 3.4322761873459997`*^9}, {3.4325278069363747`*^9, 
   3.4325278116707497`*^9}, {3.4331415057945004`*^9, 
   3.4331415071851254`*^9}, {3.434096889484375*^9, 3.434096908203125*^9}, 
   3.434097010875*^9, {3.434097069171875*^9, 3.434097069234375*^9}, 
   3.434097673359375*^9, 3.434109339859375*^9, 3.4341094461875*^9, 
   3.434109503421875*^9, {3.43411058984375*^9, 3.43411059396875*^9}, {
   3.4470665444508*^9, 3.4470665451628*^9}, {3.447404493967*^9, 
   3.4474044966730003`*^9}, {3.460434550046875*^9, 3.460434550265625*^9}, {
   3.460457058125*^9, 3.46045706525*^9}, {3.46149619040625*^9, 
   3.461496195109375*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Dimensions", "[", "res", "]"}]], "Input",
 CellChangeTimes->{{3.46043541046875*^9, 3.4604354125*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"400", ",", "3", ",", "38", ",", "38", ",", "38"}], "}"}]], "Output",
 CellChangeTimes->{3.460435412875*^9, 3.460437644125*^9, 3.46045797940625*^9, 
  3.46069605190625*^9, 3.460715886640625*^9, 3.461143231453125*^9, 
  3.4613206059375*^9, 3.461391328890625*^9, 3.46140921353125*^9, 
  3.46141130421875*^9, 3.46147531215625*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"Do", "[", 
   RowBox[{
    RowBox[{"Block", "[", 
     RowBox[{
      RowBox[{"{", "g", "}"}], ",", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"temp", "=", 
        RowBox[{"First", "[", 
         RowBox[{"Import", "[", 
          RowBox[{
           RowBox[{"\"\<dynamo_2_\>\"", "<>", 
            RowBox[{"ToString", "[", 
             RowBox[{
             "nums", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], 
             "]"}], "<>", "\"\<.snp.ZIP\>\""}], ",", 
           RowBox[{"{", 
            RowBox[{"\"\<*.snp\>\"", ",", "\"\<Binary\>\""}], "}"}]}], "]"}], 
         "]"}]}], ";", "\[IndentingNewLine]", 
       RowBox[{"Export", "[", 
        RowBox[{
         RowBox[{"\"\<dynamo_2_\>\"", "<>", 
          RowBox[{"ToString", "[", 
           RowBox[{
           "nums", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], 
           "]"}], "<>", "\"\<.snp\>\""}], ",", "temp", ",", "\"\<Binary\>\"", 
         ",", 
         RowBox[{"\"\<DataFormat\>\"", "\[Rule]", " ", "\"\<Byte\>\""}]}], 
        "]"}], ";", "\[IndentingNewLine]", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"Bx", ",", "By", ",", "Bz"}], "}"}], "=", 
        RowBox[{"ReadSection", "[", 
         RowBox[{
         "nums", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], 
         "]"}]}], ";", "\[IndentingNewLine]", 
       RowBox[{"Print", "[", 
        RowBox[{"\"\<have read dynamo_2_\>\"", "<>", 
         RowBox[{"ToString", "[", 
          RowBox[{
          "nums", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], 
          "]"}], "<>", "\"\<.snp\>\""}], "]"}], ";", "\[IndentingNewLine]", 
       RowBox[{"Close", "[", 
        RowBox[{"\"\<dynamo_2_\>\"", "<>", 
         RowBox[{"ToString", "[", 
          RowBox[{
          "nums", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], 
          "]"}], "<>", "\"\<.snp\>\""}], "]"}], ";", "\[IndentingNewLine]", 
       RowBox[{"DeleteFile", "[", 
        RowBox[{"\"\<dynamo_2_\>\"", "<>", 
         RowBox[{"ToString", "[", 
          RowBox[{
          "nums", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], 
          "]"}], "<>", "\"\<.snp\>\""}], "]"}], ";", "\[IndentingNewLine]", 
       RowBox[{"(*", 
        RowBox[{
         RowBox[{
          RowBox[{"{", 
           RowBox[{
           "Bxi", ",", "Byi", ",", "Bzi", ",", "jxi", ",", "jyi", ",", 
            "jzi"}], "}"}], "=", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{"ListInterpolation", "[", 
              RowBox[{"#1", ",", 
               RowBox[{"{", 
                RowBox[{
                 RowBox[{"{", 
                  RowBox[{
                   RowBox[{"Min", "[", 
                    RowBox[{
                    "coor", "\[LeftDoubleBracket]", "1", 
                    "\[RightDoubleBracket]"}], "]"}], ",", 
                   RowBox[{"Max", "[", 
                    RowBox[{
                    "coor", "\[LeftDoubleBracket]", "1", 
                    "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", 
                 RowBox[{"{", 
                  RowBox[{
                   RowBox[{"Min", "[", 
                    RowBox[{
                    "coor", "\[LeftDoubleBracket]", "2", 
                    "\[RightDoubleBracket]"}], "]"}], ",", 
                   RowBox[{"Max", "[", 
                    RowBox[{
                    "coor", "\[LeftDoubleBracket]", "2", 
                    "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", 
                 RowBox[{"{", 
                  RowBox[{
                   RowBox[{"Min", "[", 
                    RowBox[{
                    "coor", "\[LeftDoubleBracket]", "3", 
                    "\[RightDoubleBracket]"}], "]"}], ",", 
                   RowBox[{"Max", "[", 
                    RowBox[{
                    "coor", "\[LeftDoubleBracket]", "3", 
                    "\[RightDoubleBracket]"}], "]"}]}], "}"}]}], "}"}], ",", 
               RowBox[{"InterpolationOrder", "\[Rule]", "1"}]}], "]"}], "&"}],
             ")"}], "/@", 
           RowBox[{"{", 
            RowBox[{
            "Bx", ",", "By", ",", "Bz", ",", "jx", ",", "jy", ",", "jz"}], 
            "}"}]}]}], ";", 
         RowBox[{"g", "=", 
          RowBox[{"DisplayTogetherArray", "[", 
           RowBox[{
            RowBox[{"SectionRZ", "[", 
             RowBox[{"Bxi", ",", "Byi", ",", "Bzi", ",", 
              RowBox[{"0.2`", " ", "\[Pi]"}]}], "]"}], ",", 
            RowBox[{"SectionR\[CapitalPhi]", "[", 
             RowBox[{"Bxi", ",", "Byi", ",", "Bzi", ",", 
              RowBox[{"Mean", "[", 
               RowBox[{
               "bounds", "\[LeftDoubleBracket]", "3", 
                "\[RightDoubleBracket]"}], "]"}]}], "]"}], ",", 
            RowBox[{"Section\[CapitalPhi]Z", "[", 
             RowBox[{"Bxi", ",", "Byi", ",", "Bzi", ",", 
              RowBox[{"Mean", "[", 
               RowBox[{
               "bounds", "\[LeftDoubleBracket]", "1", 
                "\[RightDoubleBracket]"}], "]"}]}], "]"}], ",", 
            RowBox[{"Spacings", "\[Rule]", 
             RowBox[{"Scaled", "[", "0.`", "]"}]}], ",", 
            RowBox[{"DisplayFunction", "\[Rule]", "Identity"}], ",", 
            RowBox[{"PlotLabel", "\[Rule]", 
             RowBox[{"\"\<t=\>\"", "<>", 
              RowBox[{"ToString", "[", "t", "]"}]}]}]}], "]"}]}], ";"}], 
        "*)"}], "\[IndentingNewLine]", 
       RowBox[{"g", "=", 
        RowBox[{"DrawSection", "[", 
         RowBox[{"Bx", ",", "By", ",", "Bz"}], "]"}]}], ";", 
       "\[IndentingNewLine]", 
       RowBox[{"fname", "=", 
        RowBox[{"\"\<dynamo\>\"", "<>", 
         RowBox[{"ToString", "[", 
          RowBox[{
          "nums", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], 
          "]"}], "<>", "\"\<.gif\>\""}]}], ";", 
       RowBox[{"Export", "[", 
        RowBox[{"fname", ",", "g", ",", 
         RowBox[{"ImageResolution", "\[Rule]", "300"}], ",", 
         RowBox[{"ImageSize", "\[Rule]", "640"}]}], "]"}], ";"}]}], "]"}], 
    ",", 
    RowBox[{"{", 
     RowBox[{"i", ",", "1", ",", 
      RowBox[{"Length", "[", "nums", "]"}]}], "}"}]}], "]"}], ";"}]], "Input",
 CellChangeTimes->{{3.396032024591*^9, 3.396032164275*^9}, {
  3.3960322161429996`*^9, 3.3960322768190002`*^9}, {3.396032432408*^9, 
  3.396032462848*^9}, {3.396032611528*^9, 3.396032650554*^9}, {
  3.396032681407*^9, 3.396032709755*^9}, {3.39603287658*^9, 
  3.396032879454*^9}, {3.396032925429*^9, 3.396032970593*^9}, {
  3.3960366123389997`*^9, 3.3960366143514*^9}, {3.3960407469418*^9, 
  3.3960407573782*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"Do", "[", 
   RowBox[{
    RowBox[{"Block", "[", 
     RowBox[{
      RowBox[{"{", "g", "}"}], ",", "\[IndentingNewLine]", 
      RowBox[{
       RowBox[{"temp", "=", 
        RowBox[{"First", "[", 
         RowBox[{"Import", "[", 
          RowBox[{
           RowBox[{"\"\<dynamo_2_\>\"", "<>", 
            RowBox[{"ToString", "[", 
             RowBox[{
             "nums", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], 
             "]"}], "<>", "\"\<.snp.ZIP\>\""}], ",", 
           RowBox[{"{", 
            RowBox[{"\"\<*.snp\>\"", ",", "\"\<Binary\>\""}], "}"}]}], "]"}], 
         "]"}]}], ";", "\[IndentingNewLine]", 
       RowBox[{"Export", "[", 
        RowBox[{
         RowBox[{"\"\<dynamo_2_\>\"", "<>", 
          RowBox[{"ToString", "[", 
           RowBox[{
           "nums", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], 
           "]"}], "<>", "\"\<.snp\>\""}], ",", "temp", ",", "\"\<Binary\>\"", 
         ",", 
         RowBox[{"\"\<DataFormat\>\"", "\[Rule]", " ", "\"\<Byte\>\""}]}], 
        "]"}], ";", "\[IndentingNewLine]", 
       RowBox[{
        RowBox[{"{", 
         RowBox[{"Bx", ",", "By", ",", "Bz"}], "}"}], "=", 
        RowBox[{"ReadSection", "[", 
         RowBox[{
         "nums", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], 
         "]"}]}], ";", "\[IndentingNewLine]", 
       RowBox[{"Print", "[", 
        RowBox[{"\"\<have read dynamo_2_\>\"", "<>", 
         RowBox[{"ToString", "[", 
          RowBox[{
          "nums", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], 
          "]"}], "<>", "\"\<.snp\>\""}], "]"}], ";", "\[IndentingNewLine]", 
       RowBox[{"Close", "[", 
        RowBox[{"\"\<dynamo_2_\>\"", "<>", 
         RowBox[{"ToString", "[", 
          RowBox[{
          "nums", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], 
          "]"}], "<>", "\"\<.snp\>\""}], "]"}], ";", "\[IndentingNewLine]", 
       RowBox[{"DeleteFile", "[", 
        RowBox[{"\"\<dynamo_2_\>\"", "<>", 
         RowBox[{"ToString", "[", 
          RowBox[{
          "nums", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], 
          "]"}], "<>", "\"\<.snp\>\""}], "]"}], ";", "\[IndentingNewLine]", 
       RowBox[{"(*", 
        RowBox[{
         RowBox[{
          RowBox[{"{", 
           RowBox[{
           "Bxi", ",", "Byi", ",", "Bzi", ",", "jxi", ",", "jyi", ",", 
            "jzi"}], "}"}], "=", 
          RowBox[{
           RowBox[{"(", 
            RowBox[{
             RowBox[{"ListInterpolation", "[", 
              RowBox[{"#1", ",", 
               RowBox[{"{", 
                RowBox[{
                 RowBox[{"{", 
                  RowBox[{
                   RowBox[{"Min", "[", 
                    RowBox[{
                    "coor", "\[LeftDoubleBracket]", "1", 
                    "\[RightDoubleBracket]"}], "]"}], ",", 
                   RowBox[{"Max", "[", 
                    RowBox[{
                    "coor", "\[LeftDoubleBracket]", "1", 
                    "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", 
                 RowBox[{"{", 
                  RowBox[{
                   RowBox[{"Min", "[", 
                    RowBox[{
                    "coor", "\[LeftDoubleBracket]", "2", 
                    "\[RightDoubleBracket]"}], "]"}], ",", 
                   RowBox[{"Max", "[", 
                    RowBox[{
                    "coor", "\[LeftDoubleBracket]", "2", 
                    "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", 
                 RowBox[{"{", 
                  RowBox[{
                   RowBox[{"Min", "[", 
                    RowBox[{
                    "coor", "\[LeftDoubleBracket]", "3", 
                    "\[RightDoubleBracket]"}], "]"}], ",", 
                   RowBox[{"Max", "[", 
                    RowBox[{
                    "coor", "\[LeftDoubleBracket]", "3", 
                    "\[RightDoubleBracket]"}], "]"}]}], "}"}]}], "}"}], ",", 
               RowBox[{"InterpolationOrder", "\[Rule]", "1"}]}], "]"}], "&"}],
             ")"}], "/@", 
           RowBox[{"{", 
            RowBox[{
            "Bx", ",", "By", ",", "Bz", ",", "jx", ",", "jy", ",", "jz"}], 
            "}"}]}]}], ";", 
         RowBox[{"g", "=", 
          RowBox[{"DisplayTogetherArray", "[", 
           RowBox[{
            RowBox[{"SectionRZ", "[", 
             RowBox[{"Bxi", ",", "Byi", ",", "Bzi", ",", 
              RowBox[{"0.2`", " ", "\[Pi]"}]}], "]"}], ",", 
            RowBox[{"SectionR\[CapitalPhi]", "[", 
             RowBox[{"Bxi", ",", "Byi", ",", "Bzi", ",", 
              RowBox[{"Mean", "[", 
               RowBox[{
               "bounds", "\[LeftDoubleBracket]", "3", 
                "\[RightDoubleBracket]"}], "]"}]}], "]"}], ",", 
            RowBox[{"Section\[CapitalPhi]Z", "[", 
             RowBox[{"Bxi", ",", "Byi", ",", "Bzi", ",", 
              RowBox[{"Mean", "[", 
               RowBox[{
               "bounds", "\[LeftDoubleBracket]", "1", 
                "\[RightDoubleBracket]"}], "]"}]}], "]"}], ",", 
            RowBox[{"Spacings", "\[Rule]", 
             RowBox[{"Scaled", "[", "0.`", "]"}]}], ",", 
            RowBox[{"DisplayFunction", "\[Rule]", "Identity"}], ",", 
            RowBox[{"PlotLabel", "\[Rule]", 
             RowBox[{"\"\<t=\>\"", "<>", 
              RowBox[{"ToString", "[", "t", "]"}]}]}]}], "]"}]}], ";"}], 
        "*)"}], "\[IndentingNewLine]", 
       RowBox[{"g", "=", 
        RowBox[{"DrawSection", "[", 
         RowBox[{"Bx", ",", "By", ",", "Bz"}], "]"}]}], ";", 
       "\[IndentingNewLine]", 
       RowBox[{"fname", "=", 
        RowBox[{"\"\<dynamo\>\"", "<>", 
         RowBox[{"ToString", "[", 
          RowBox[{
          "nums", "\[LeftDoubleBracket]", "i", "\[RightDoubleBracket]"}], 
          "]"}], "<>", "\"\<.gif\>\""}]}], ";", 
       RowBox[{"Export", "[", 
        RowBox[{"fname", ",", "g", ",", 
         RowBox[{"ImageResolution", "\[Rule]", "300"}], ",", 
         RowBox[{"ImageSize", "\[Rule]", "640"}]}], "]"}], ";"}]}], "]"}], 
    ",", 
    RowBox[{"{", 
     RowBox[{"i", ",", "1", ",", 
      RowBox[{"Length", "[", "nums", "]"}]}], "}"}]}], "]"}], ";"}]], "Input",
 CellChangeTimes->{{3.396032024591*^9, 3.396032164275*^9}, {
  3.3960322161429996`*^9, 3.3960322768190002`*^9}, {3.396032432408*^9, 
  3.396032462848*^9}, {3.396032611528*^9, 3.396032650554*^9}, {
  3.396032681407*^9, 3.396032709755*^9}, {3.39603287658*^9, 
  3.396032879454*^9}, {3.396032925429*^9, 3.396032970593*^9}, {
  3.3960366123389997`*^9, 3.3960366143514*^9}, {3.3960407469418*^9, 
  3.3960407573782*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"gr", "=", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{
      RowBox[{
       RowBox[{"{", 
        RowBox[{"Bx", ",", "By", ",", "Bz", ",", "jx", ",", "jy", ",", "jz"}],
         "}"}], "=", 
       RowBox[{"ReadSection", "[", "i", "]"}]}], ";", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
        "Bxi", ",", "Byi", ",", "Bzi", ",", "jxi", ",", "jyi", ",", "jzi"}], 
        "}"}], "=", 
       RowBox[{
        RowBox[{"(", 
         RowBox[{
          RowBox[{"ListInterpolation", "[", 
           RowBox[{"#1", ",", 
            RowBox[{"{", 
             RowBox[{
              RowBox[{"{", 
               RowBox[{
                RowBox[{"Min", "[", 
                 RowBox[{
                 "coor", "\[LeftDoubleBracket]", "1", 
                  "\[RightDoubleBracket]"}], "]"}], ",", 
                RowBox[{"Max", "[", 
                 RowBox[{
                 "coor", "\[LeftDoubleBracket]", "1", 
                  "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"Min", "[", 
                 RowBox[{
                 "coor", "\[LeftDoubleBracket]", "2", 
                  "\[RightDoubleBracket]"}], "]"}], ",", 
                RowBox[{"Max", "[", 
                 RowBox[{
                 "coor", "\[LeftDoubleBracket]", "2", 
                  "\[RightDoubleBracket]"}], "]"}]}], "}"}], ",", 
              RowBox[{"{", 
               RowBox[{
                RowBox[{"Min", "[", 
                 RowBox[{
                 "coor", "\[LeftDoubleBracket]", "3", 
                  "\[RightDoubleBracket]"}], "]"}], ",", 
                RowBox[{"Max", "[", 
                 RowBox[{
                 "coor", "\[LeftDoubleBracket]", "3", 
                  "\[RightDoubleBracket]"}], "]"}]}], "}"}]}], "}"}], ",", 
            RowBox[{"InterpolationOrder", "\[Rule]", "1"}]}], "]"}], "&"}], 
         ")"}], "/@", 
        RowBox[{"{", 
         RowBox[{
         "Bx", ",", "By", ",", "Bz", ",", "jx", ",", "jy", ",", "jz"}], 
         "}"}]}]}], ";", 
      RowBox[{"DisplayTogetherArray", "[", 
       RowBox[{
        RowBox[{"SectionRZ", "[", 
         RowBox[{"Bxi", ",", "Byi", ",", "Bzi", ",", 
          RowBox[{"0.2`", " ", "\[Pi]"}]}], "]"}], ",", 
        RowBox[{"SectionR\[CapitalPhi]", "[", 
         RowBox[{"Bxi", ",", "Byi", ",", "Bzi", ",", 
          RowBox[{"Mean", "[", 
           RowBox[{
           "bounds", "\[LeftDoubleBracket]", "3", "\[RightDoubleBracket]"}], 
           "]"}]}], "]"}], ",", 
        RowBox[{"Section\[CapitalPhi]Z", "[", 
         RowBox[{"Bxi", ",", "Byi", ",", "Bzi", ",", 
          RowBox[{"Mean", "[", 
           RowBox[{
           "bounds", "\[LeftDoubleBracket]", "1", "\[RightDoubleBracket]"}], 
           "]"}]}], "]"}], ",", 
        RowBox[{"Spacings", "\[Rule]", 
         RowBox[{"Scaled", "[", "0.`", "]"}]}], ",", 
        RowBox[{"DisplayFunction", "\[Rule]", "Identity"}]}], "]"}]}], ",", 
     RowBox[{"{", 
      RowBox[{"i", ",", "10", ",", "2820", ",", "10"}], "}"}]}], "]"}]}], 
  ";"}]], "Input"],

Cell[BoxData[
 RowBox[{"grtot", "=", 
  RowBox[{"First", "/@", "gr"}]}]], "Input"],

Cell[BoxData[
 RowBox[{
  RowBox[{"Export", "[", 
   RowBox[{"\"\<current.gif\>\"", ",", 
    RowBox[{
     RowBox[{
      RowBox[{"Show", "[", 
       RowBox[{"#", ",", 
        RowBox[{"DisplayFunction", "\[Rule]", "Identity"}]}], "]"}], "&"}], "/@",
      "gr"}], ",", 
    RowBox[{"ConversionOptions", "\[Rule]", 
     RowBox[{"{", 
      RowBox[{"\"\<AnimationDisplayTime\>\"", "\[Rule]", "0.2"}], "}"}]}], 
    ",", 
    RowBox[{"ImageResolution", "\[Rule]", "300"}], ",", 
    RowBox[{"ImageSize", "\[Rule]", "640"}]}], "]"}], ";"}]], "Input"]
}, Closed]],

Cell[CellGroupData[{

Cell["\:0421\:043b\:043e\:0436\:043d\:043e\:0435 \:0440\:0438\:0441\:043e\
\:0432\:0430\:043d\:0438\:0435 \:043f\:043e\:0432\:0435\:0440\:0445\:043d\
\:043e\:0441\:0442\:0435\:0439", "Subsubsection",
 CellChangeTimes->{{3.4535760861914*^9, 3.4535761032265997`*^9}, 
   3.4535761997906*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"{", 
   RowBox[{"cont1", ",", " ", "cont2"}], "}"}], " ", "=", " ", 
  RowBox[{
   RowBox[{"(", 
    RowBox[{
     RowBox[{"0.1", "*", 
      RowBox[{"{", 
       RowBox[{
        RowBox[{"Max", "[", "#1", "]"}], ",", " ", 
        RowBox[{"Min", "[", "#1", "]"}]}], "}"}]}], " ", "&"}], " ", ")"}], 
   "[", "By", "]"}]}]], "Input",
 CellChangeTimes->{3.4535761032265997`*^9, 3.4535761997906*^9}],

Cell[BoxData["bounds"], "Input",
 CellChangeTimes->{3.4535761032265997`*^9, 3.4535761997906*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"cubic", "=", 
   RowBox[{"Table", "[", 
    RowBox[{
     RowBox[{"Block", "[", 
      RowBox[{
       RowBox[{"{", 
        RowBox[{
         RowBox[{"r", "=", 
          SqrtBox[
           RowBox[{
            SuperscriptBox["x", "2"], "+", 
            SuperscriptBox["y", "2"]}]]}], ",", 
         RowBox[{"f", "=", 
          RowBox[{
           RowBox[{"ArcTan", "[", 
            RowBox[{"y", ",", 
             RowBox[{"x", "+", 
              SuperscriptBox["10", 
               RowBox[{"-", "10"}]]}]}], "]"}], "+", "\[Pi]"}]}]}], "}"}], 
       ",", 
       RowBox[{"If", "[", 
        RowBox[{
         RowBox[{
          RowBox[{"z", "\[LessEqual]", 
           RowBox[{"bounds", "\[LeftDoubleBracket]", 
            RowBox[{"3", ",", "2"}], "\[RightDoubleBracket]"}]}], "\[And]", 
          RowBox[{"z", "\[GreaterEqual]", 
           RowBox[{"bounds", "\[LeftDoubleBracket]", 
            RowBox[{"3", ",", "1"}], "\[RightDoubleBracket]"}]}], "\[And]", 
          RowBox[{"r", "\[LessEqual]", 
           RowBox[{"bounds", "\[LeftDoubleBracket]", 
            RowBox[{"1", ",", "2"}], "\[RightDoubleBracket]"}]}], "\[And]", 
          RowBox[{"r", "\[GreaterEqual]", 
           RowBox[{"bounds", "\[LeftDoubleBracket]", 
            RowBox[{"1", ",", "1"}], "\[RightDoubleBracket]"}]}]}], ",", 
         RowBox[{"Byi", "[", 
          RowBox[{"r", ",", "f", ",", "z"}], "]"}], ",", "0"}], "]"}]}], 
      "]"}], ",", 
     RowBox[{"{", 
      RowBox[{"z", ",", 
       RowBox[{"-", "1.5"}], ",", "1.5", ",", "0.2"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"x", ",", 
       RowBox[{"-", "6"}], ",", "6", ",", "0.2"}], "}"}], ",", 
     RowBox[{"{", 
      RowBox[{"y", ",", 
       RowBox[{"-", "6"}], ",", "6", ",", "0.2"}], "}"}]}], "]"}]}], 
  ";"}]], "Input",
 CellChangeTimes->{3.4535761032265997`*^9, 3.4535761997906*^9}],

Cell[BoxData[{
 RowBox[{
  RowBox[{"g1", " ", "=", " ", 
   RowBox[{"ColorLighting", "[", 
    RowBox[{
     RowBox[{"ListContourPlot3D", "[", 
      RowBox[{"cubic", ",", " ", 
       RowBox[{"Contours", " ", "->", " ", 
        RowBox[{"{", "cont1", "}"}]}], ",", " ", 
       RowBox[{"DisplayFunction", " ", "->", " ", "Identity"}]}], "]"}], ",", 
     " ", 
     RowBox[{"{", 
      RowBox[{"1", ",", " ", "0", ",", " ", "0"}], "}"}]}], "]"}]}], 
  ";"}], "\n", 
 RowBox[{
  RowBox[{"g2", " ", "=", " ", 
   RowBox[{"ColorLighting", "[", 
    RowBox[{
     RowBox[{"ListContourPlot3D", "[", 
      RowBox[{"cubic", ",", " ", 
       RowBox[{"Contours", " ", "->", " ", 
        RowBox[{"{", "cont2", "}"}]}], ",", " ", 
       RowBox[{"DisplayFunction", " ", "->", " ", "Identity"}]}], "]"}], ",", 
     " ", 
     RowBox[{"{", 
      RowBox[{"0", ",", " ", "0", ",", " ", "1"}], "}"}]}], "]"}]}], 
  ";"}]}], "Input",
 CellChangeTimes->{3.4535761032265997`*^9, 3.4535761997906*^9}],

Cell[BoxData[
 RowBox[{"Show", "[", 
  RowBox[{"g1", ",", " ", 
   RowBox[{"Lighting", " ", "->", " ", "Automatic"}]}], "]"}]], "Input",
 CellChangeTimes->{3.4535761032265997`*^9, 3.4535761997906*^9}],

Cell[BoxData[
 RowBox[{"Show", "[", 
  RowBox[{
   RowBox[{"Graphics3D", "[", 
    RowBox[{"EdgeForm", "[", "]"}], "]"}], ",", " ", "g1", ",", " ", "g2", 
   ",", " ", 
   RowBox[{"Lighting", " ", "->", " ", "None"}]}], "]"}]], "Input",
 CellChangeTimes->{3.4535761032265997`*^9, 3.4535761997906*^9}],

Cell[BoxData[
 RowBox[{"Show", "[", 
  RowBox[{
   RowBox[{"Graphics3D", "[", 
    RowBox[{"EdgeForm", "[", "]"}], "]"}], ",", " ", 
   RowBox[{"ColorLighting", "[", 
    RowBox[{
     RowBox[{"ListContourPlot3D", "[", 
      RowBox[{"cubic", ",", " ", 
       RowBox[{"Contours", " ", "->", " ", 
        RowBox[{"{", "cont1", "}"}]}], ",", " ", 
       RowBox[{"DisplayFunction", " ", "->", " ", "Identity"}]}], "]"}], ",", 
     " ", 
     RowBox[{"{", 
      RowBox[{"1", ",", " ", "0", ",", " ", "0"}], "}"}]}], "]"}], ",", " ", 
   RowBox[{"ColorLighting", "[", 
    RowBox[{
     RowBox[{"ListContourPlot3D", "[", 
      RowBox[{"cubic", ",", " ", 
       RowBox[{"Contours", " ", "->", " ", 
        RowBox[{"{", "cont2", "}"}]}], ",", " ", 
       RowBox[{"DisplayFunction", " ", "->", " ", "Identity"}]}], "]"}], ",", 
     " ", 
     RowBox[{"{", 
      RowBox[{"0", ",", " ", "0", ",", " ", "1"}], "}"}]}], "]"}], ",", " ", 
   RowBox[{"Lighting", " ", "->", " ", "None"}]}], "]"}]], "Input",
 CellChangeTimes->{3.4535761032265997`*^9, 3.4535761997906*^9}]
}, Closed]],

Cell[CellGroupData[{

Cell["\:041f\:0440\:043e\:0441\:0442\:043e\:0435 \:0440\:0438\:0441\:043e\
\:0432\:0430\:043d\:0438\:0435 \:043f\:043e\:0432\:0435\:0440\:0445\:043d\
\:043e\:0441\:0442\:0435\:0439", "Subsubsection",
 CellChangeTimes->{{3.409341419406*^9, 3.40934143437*^9}, {3.4535760684698*^9,
    3.453576072479*^9}, 3.4535761997906*^9}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{"{", 
   RowBox[{"min", ",", "max"}], "}"}], "=", 
  RowBox[{
   RowBox[{
    RowBox[{"{", 
     RowBox[{
      RowBox[{"Max", "[", "#", "]"}], ",", 
      RowBox[{"Min", "[", "#", "]"}]}], "}"}], "&"}], "@", 
   "helicity"}]}]], "Input",
 CellChangeTimes->{{3.45914933578125*^9, 3.459149374046875*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"1.8378870567198575`", ",", 
   RowBox[{"-", "0.059760290217658704`"}]}], "}"}]], "Output",
 CellChangeTimes->{{3.459149346453125*^9, 3.45914937475*^9}, 3.4591609785*^9, 
   3.45916106053125*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"val", "=", 
   RowBox[{
    SuperscriptBox["By", "2"], "+", 
    SuperscriptBox["Bx", "2"], "+", 
    SuperscriptBox["Bz", "2"]}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"mx", " ", "=", " ", 
  RowBox[{"Max", "[", 
   RowBox[{"Abs", "@", "val"}], "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"{", 
    RowBox[{"min", ",", "max"}], "}"}], "=", 
   RowBox[{"mx", 
    RowBox[{"{", 
     RowBox[{
      RowBox[{"-", "1"}], ",", "1"}], "}"}]}]}], ";"}]}], "Input",
 CellChangeTimes->{{3.4052705427557325`*^9, 3.4052705577973614`*^9}, 
   3.4052705961725426`*^9, {3.409341092967*^9, 3.409341108074*^9}, {
   3.40934130252*^9, 3.4093413088640003`*^9}, {3.409341346699*^9, 
   3.4093413737139997`*^9}, 3.40934143437*^9, 3.4535759180078*^9, {
   3.4535759826074*^9, 3.4535760170053997`*^9}, 3.4535761997906*^9, {
   3.45914938090625*^9, 3.4591493904375*^9}, {3.4876681766935816`*^9, 
   3.487668179610782*^9}, {3.487952322555647*^9, 3.4879523328672485`*^9}, {
   3.488011420074564*^9, 3.4880114265953655`*^9}}],

Cell[BoxData["0.00006203319766606253`"], "Output",
 CellChangeTimes->{
  3.45362257909375*^9, 3.45362290253125*^9, 3.459149392234375*^9, 
   3.459162325203125*^9, 3.4876777847666907`*^9, 3.4879241395744457`*^9, {
   3.487952329684848*^9, 3.487952333288449*^9}, 3.4879537179603243`*^9, 
   3.4879539515703707`*^9, 3.4879964111243815`*^9, 3.488011428654566*^9, 
   3.4880167920292315`*^9, 3.488019026784276*^9, 3.488088689378119*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{
  RowBox[{"val", "=", 
   RowBox[{"out", "[", 
    RowBox[{"[", "2", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
 RowBox[{"mx", " ", "=", " ", 
  RowBox[{"Max", "[", 
   RowBox[{"Abs", "@", "val"}], "]"}]}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
   RowBox[{"{", 
    RowBox[{"min", ",", "max"}], "}"}], "=", 
   RowBox[{"{", 
    RowBox[{"0", ",", "mx"}], "}"}]}], ";"}]}], "Input",
 CellChangeTimes->{{3.4052705427557325`*^9, 3.4052705577973614`*^9}, 
   3.4052705961725426`*^9, {3.409341092967*^9, 3.409341108074*^9}, {
   3.40934130252*^9, 3.4093413088640003`*^9}, {3.409341346699*^9, 
   3.4093413737139997`*^9}, 3.40934143437*^9, 3.4535759180078*^9, {
   3.4535759826074*^9, 3.4535760170053997`*^9}, 3.4535761997906*^9, {
   3.45914938090625*^9, 3.4591493904375*^9}, {3.4876681766935816`*^9, 
   3.487668197316786*^9}, {3.487669795209503*^9, 3.487669800076704*^9}, {
   3.4876738432543077`*^9, 3.487673890054317*^9}, {3.48794967080472*^9, 
   3.4879496810851216`*^9}, {3.4879497752779408`*^9, 3.487949778288741*^9}, 
   3.4879498415779533`*^9}],

Cell[BoxData["1.4967594146728516`"], "Output",
 CellChangeTimes->{
  3.4876681991731863`*^9, 3.487669511507847*^9, 3.4876698007787046`*^9, 
   3.4876737501846895`*^9, 3.487673810790701*^9, {3.487673843706708*^9, 
   3.487673890241517*^9}, 3.487674085366356*^9, 3.487676048361546*^9, {
   3.4879496580907173`*^9, 3.487949682738722*^9}, 3.4879497789595413`*^9, 
   3.4879498419523535`*^9, 3.487953669288314*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{"gh", " ", "=", " ", 
  RowBox[{"ListContourPlot3D", "[", 
   RowBox[{
    RowBox[{"Transpose", "[", 
     RowBox[{"val", ",", 
      RowBox[{"{", 
       RowBox[{"3", ",", "2", ",", "1"}], "}"}]}], "]"}], ",", " ", 
    RowBox[{"Contours", " ", "\[Rule]", 
     RowBox[{
      FractionBox[
       RowBox[{"min", "+", "max"}], "2"], "+", 
      RowBox[{
       FractionBox[
        RowBox[{"max", "-", "min"}], "2"], 
       RowBox[{"1", "/", "4"}], 
       RowBox[{"{", 
        RowBox[{
         RowBox[{"-", 
          FractionBox["1", "2"]}], ",", 
         FractionBox["1", "2"]}], "}"}]}]}]}], " ", ",", " ", 
    RowBox[{"ContourStyle", " ", "->", " ", 
     RowBox[{"{", 
      RowBox[{
       RowBox[{"Directive", "[", 
        RowBox[{"Yellow", ",", " ", 
         RowBox[{"Opacity", "[", "0.8", "]"}]}], "]"}], ",", " ", 
       RowBox[{"Directive", "[", 
        RowBox[{"Pink", ",", " ", 
         RowBox[{"Opacity", "[", "0.8", "]"}]}], "]"}]}], "}"}]}], ",", " ", 
    RowBox[{"BoxRatios", " ", "->", " ", "Automatic"}], ",", " ", 
    RowBox[{"Mesh", " ", "->", " ", "False"}], ",", " ", 
    RowBox[{"AxesLabel", " ", "->", " ", 
     RowBox[{"{", 
      RowBox[{"x", ",", " ", "y", ",", " ", "z"}], "}"}]}], ",", " ", 
    RowBox[{"DataRange", " ", "->", " ", "bounds"}]}], "]"}]}]], "Input",
 CellChangeTimes->{{3.4052706022312546`*^9, 3.405270634587781*^9}, {
   3.405270745847765*^9, 3.4052707556819057`*^9}, {3.405271140785658*^9, 
   3.405271143649776*^9}, {3.409341128416*^9, 3.409341144784*^9}, {
   3.40934123341*^9, 3.409341237156*^9}, {3.409341276205*^9, 
   3.409341280727*^9}, {3.409341316645*^9, 3.409341376817*^9}, 
   3.409341434667*^9, {3.4535759226098003`*^9, 3.4535759521874*^9}, {
   3.4535759877242002`*^9, 3.4535760239006*^9}, 3.4535761997906*^9, {
   3.45362258596875*^9, 3.453622587453125*^9}, {3.453622907765625*^9, 
   3.453622909296875*^9}, {3.45916101159375*^9, 3.459161020328125*^9}, {
   3.459161057703125*^9, 3.4591610670625*^9}, {3.459161102703125*^9, 
   3.45916111703125*^9}, {3.459161157328125*^9, 3.459161157734375*^9}, {
   3.45916233959375*^9, 3.459162339859375*^9}, {3.487668205475587*^9, 
   3.4876682074723873`*^9}, 3.487669743074293*^9, {3.487669874863119*^9, 
   3.4876698973583236`*^9}, {3.4876738513039093`*^9, 
   3.4876738635343113`*^9}, {3.4876777882142916`*^9, 
   3.4876777926602926`*^9}, {3.487924151102848*^9, 3.48792416174205*^9}, 
   3.4879496854687223`*^9, {3.487949846289154*^9, 3.487949846788355*^9}, {
   3.487953653844311*^9, 3.487953654125111*^9}, {3.487953684295517*^9, 
   3.4879536897243185`*^9}, {3.487953724543525*^9, 3.487953738006328*^9}, {
   3.487996416537583*^9, 3.4879964206871834`*^9}, {3.4880114466101694`*^9, 
   3.4880114631617727`*^9}, {3.488011897575059*^9, 3.4880119552794704`*^9}, 
   3.4880190403718786`*^9, {3.4880190811190863`*^9, 3.4880191331294966`*^9}, {
   3.488019165062703*^9, 3.4880191720671043`*^9}, {3.488019733292816*^9, 
   3.488019758174821*^9}}]
}, Closed]],

Cell[CellGroupData[{

Cell["\<\
\:041f\:0440\:043e\:0441\:043c\:043e\:0442\:0440 \:043c\:0430\:0441\:0441\
\:0438\:0432\:0430 \:0442\:0438\:043f\:0430 \:044f\:0447\:0435\:0435\:043a \
\:0438 \:043e\:0442\:0440\:0430\:0436\:0435\:043d\:0438\:0439\
\>", "Subsubsection",
 CellChangeTimes->{{3.4155230236470003`*^9, 3.415523029025*^9}, 
   3.4535761997906*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{
   RowBox[{"{", "node", "}"}], " ", "=", " ", 
   RowBox[{"ReadAuxFiles", "[", 
    RowBox[{"{", "\"\<node\>\"", "}"}], "]"}]}], ";"}]], "Input",
 CellChangeTimes->{3.415523029025*^9, 3.4535761997906*^9}],

Cell[BoxData[
 RowBox[{"Union", "[", 
  RowBox[{"Flatten", "[", "node", "]"}], "]"}]], "Input",
 CellChangeTimes->{{3.43565589181675*^9, 3.4356558966605*^9}, 
   3.4535760597026*^9, 3.4535761997906*^9}],

Cell[BoxData[
 RowBox[{"coor", "[", 
  RowBox[{"[", "1", "]"}], "]"}]], "Input",
 CellChangeTimes->{{3.43565613656675*^9, 3.435656140473*^9}, 
   3.4535760597026*^9, 3.4535761997906*^9}],

Cell[BoxData[
 RowBox[{"ArrayPlot", "[", 
  RowBox[{
   RowBox[{"Transpose", "[", 
    RowBox[{"Map", "[", 
     RowBox[{
      RowBox[{
       RowBox[{"BitAnd", "[", 
        RowBox[{
         RowBox[{"Round", "[", "#1", "]"}], ",", " ", "31"}], "]"}], " ", 
       "&"}], ",", " ", "node", ",", " ", 
      RowBox[{"{", "2", "}"}]}], "]"}], "]"}], ",", " ", 
   RowBox[{"FrameTicks", " ", "->", " ", "True"}], ",", " ", 
   RowBox[{"Mesh", " ", "->", " ", "True"}], ",", " ", 
   RowBox[{"Frame", " ", "->", " ", "True"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.408520658314*^9, 3.4085206609630003`*^9}, {
   3.408520695631*^9, 3.408520709075*^9}, {3.4085207429309998`*^9, 
   3.4085207429960003`*^9}, {3.415522982582*^9, 3.415522996329*^9}, 
   3.415523029025*^9, {3.435655814488625*^9, 3.435655853457375*^9}, 
   3.4535761997906*^9}],

Cell[BoxData[{
 RowBox[{
  RowBox[{"flag", " ", "=", " ", 
   RowBox[{"8", " ", "+", " ", "64"}]}], ";"}], "\n", 
 RowBox[{"ListDensityPlot", "[", 
  RowBox[{"Transpose", "[", 
   RowBox[{"Map", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"BitAnd", "[", 
       RowBox[{
        RowBox[{"Round", "[", "#1", "]"}], ",", " ", "flag"}], "]"}], " ", 
      "&"}], ",", " ", 
     RowBox[{"nm", "[", 
      RowBox[{"[", "2", "]"}], "]"}], ",", " ", 
     RowBox[{"{", "2", "}"}]}], "]"}], "]"}], "]"}], "\n", 
 RowBox[{"ListDensityPlot", "[", 
  RowBox[{"Transpose", "[", 
   RowBox[{"Map", "[", 
    RowBox[{
     RowBox[{
      RowBox[{"BitAnd", "[", 
       RowBox[{
        RowBox[{"Round", "[", "#1", "]"}], ",", " ", "flag"}], "]"}], " ", 
      "&"}], ",", " ", 
     RowBox[{"nm", "[", 
      RowBox[{"[", "1", "]"}], "]"}], ",", " ", 
     RowBox[{"{", "2", "}"}]}], "]"}], "]"}], "]"}]}], "Input",
 CellChangeTimes->{3.3960371798358*^9, 3.415523029025*^9, 3.4535761997906*^9}],

Cell[BoxData[
 RowBox[{"gc", "=", 
  RowBox[{"Graphics", "[", 
   RowBox[{"Circle", "[", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
       RowBox[{
        FractionBox["n1", "2"], "+", "ghost"}], ",", 
       RowBox[{
        FractionBox["n1", "2"], "+", "ghost"}]}], "}"}], ",", 
     FractionBox["n1", "2"]}], "]"}], "]"}]}]], "Input",
 CellChangeTimes->{3.415523029025*^9, 3.4535761997906*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"DisplayTogether", "[", 
   RowBox[{
    RowBox[{"ListContourPlot", "[", "node", "]"}], ",", " ", "gc"}], "]"}], 
  ";"}]], "Input",
 CellChangeTimes->{3.415523029025*^9, 3.4535761997906*^9}]
}, Closed]]
},
AutoGeneratedPackage->None,
WindowSize->{1015, 540},
WindowMargins->{{65, Automatic}, {Automatic, 3}},
ShowSelection->True,
FrontEndVersion->"8.0 for Microsoft Windows (64-bit) (October 6, 2011)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[545, 20, 248, 5, 52, "Input",
 InitializationCell->True],
Cell[CellGroupData[{
Cell[818, 29, 3244, 48, 31, "Input"],
Cell[4065, 79, 547, 9, 30, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[4649, 93, 118, 2, 31, "Input"],
Cell[4770, 97, 160, 2, 30, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[4967, 104, 976, 14, 31, "Input"],
Cell[5946, 120, 141, 1, 30, "Output"]
}, Open  ]],
Cell[6102, 124, 80, 2, 31, "Input"],
Cell[CellGroupData[{
Cell[6207, 130, 211, 3, 27, "Subsubsection"],
Cell[6421, 135, 465, 10, 31, "Input"],
Cell[6889, 147, 816, 16, 92, "Input"],
Cell[7708, 165, 509, 10, 72, "Input"],
Cell[8220, 177, 514, 12, 31, "Input"],
Cell[8737, 191, 337, 8, 31, "Input"],
Cell[CellGroupData[{
Cell[9099, 203, 327, 8, 31, "Input"],
Cell[9429, 213, 644, 11, 30, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[10110, 229, 2072, 52, 172, "Input"],
Cell[12185, 283, 3289, 80, 91, "Output"]
}, Open  ]],
Cell[15489, 366, 241, 5, 31, "Input"],
Cell[15733, 373, 495, 12, 92, "Input"],
Cell[CellGroupData[{
Cell[16253, 389, 932, 21, 38, "Input"],
Cell[17188, 412, 396, 6, 50, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[17621, 423, 1525, 25, 52, "Input"],
Cell[19149, 450, 2638, 44, 480, "Output"],
Cell[21790, 496, 1823, 25, 30, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[23650, 526, 498, 14, 38, "Input"],
Cell[24151, 542, 620, 10, 21, "Message"],
Cell[24774, 554, 1536, 40, 88, "Output"]
}, Open  ]]
}, Closed]],
Cell[CellGroupData[{
Cell[26359, 600, 191, 2, 21, "Subsubsection"],
Cell[26553, 604, 877, 25, 92, "Input"],
Cell[27433, 631, 418, 13, 31, "Input"],
Cell[27854, 646, 878, 19, 92, "Input"],
Cell[28735, 667, 665, 18, 52, "Input"],
Cell[CellGroupData[{
Cell[29425, 689, 6636, 122, 172, "Input"],
Cell[36064, 813, 1290, 24, 241, "Output"]
}, Open  ]],
Cell[37369, 840, 7779, 162, 172, "Input"],
Cell[45151, 1004, 540, 16, 31, "Input"],
Cell[45694, 1022, 9347, 165, 132, "Input"],
Cell[CellGroupData[{
Cell[55066, 1191, 326, 6, 31, "Input"],
Cell[55395, 1199, 572, 11, 30, "Output"]
}, Open  ]],
Cell[55982, 1213, 616, 17, 52, "Input"],
Cell[56601, 1232, 1156, 33, 101, "Input"],
Cell[57760, 1267, 1169, 33, 101, "Input"],
Cell[58932, 1302, 1818, 47, 101, "Input"],
Cell[60753, 1351, 1132, 32, 52, "Input"],
Cell[61888, 1385, 353, 5, 31, "Input"],
Cell[62244, 1392, 1213, 33, 52, "Input"]
}, Open  ]],
Cell[CellGroupData[{
Cell[63494, 1430, 177, 2, 27, "Subsubsection"],
Cell[63674, 1434, 127, 2, 31, "Input"],
Cell[63804, 1438, 450, 12, 31, "Input"],
Cell[CellGroupData[{
Cell[64279, 1454, 387, 8, 31, "Input"],
Cell[CellGroupData[{
Cell[64691, 1466, 143, 3, 23, "Print"],
Cell[64837, 1471, 186, 4, 23, "Print"],
Cell[65026, 1477, 435, 9, 23, "Print"],
Cell[65464, 1488, 210, 5, 23, "Print"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[65723, 1499, 311, 7, 31, "Input"],
Cell[CellGroupData[{
Cell[66059, 1510, 338, 6, 23, "Print"],
Cell[66400, 1518, 380, 7, 23, "Print"],
Cell[66783, 1527, 632, 12, 23, "Print"],
Cell[67418, 1541, 407, 8, 23, "Print"]
}, Open  ]]
}, Open  ]],
Cell[67852, 1553, 597, 16, 31, "Input"],
Cell[68452, 1571, 772, 21, 121, "Input"],
Cell[69227, 1594, 2104, 64, 112, "Input"],
Cell[CellGroupData[{
Cell[71356, 1662, 2711, 51, 72, "Input"],
Cell[CellGroupData[{
Cell[74092, 1717, 318, 6, 23, "Print"],
Cell[74413, 1725, 371, 8, 23, "Print"],
Cell[74787, 1735, 602, 11, 23, "Print"],
Cell[75392, 1748, 382, 8, 23, "Print"],
Cell[75777, 1758, 527, 13, 23, "Print"]
}, Open  ]]
}, Open  ]],
Cell[76331, 1775, 434, 13, 31, "Input"],
Cell[76768, 1790, 8185, 134, 72, "Input"],
Cell[84956, 1926, 340, 7, 31, "Input"],
Cell[CellGroupData[{
Cell[85321, 1937, 294, 4, 29, "Text",
 CellGroupingRules->{GroupTogetherGrouping, 10000.}],
Cell[85618, 1943, 1540, 36, 105, "Input",
 CellGroupingRules->{GroupTogetherGrouping, 10000.},
 InitializationCell->True],
Cell[87161, 1981, 1294, 36, 105, "Input",
 CellGroupingRules->{GroupTogetherGrouping, 10000.},
 InitializationCell->True]
}, Closed]],
Cell[88470, 2020, 341, 10, 25, "Input"],
Cell[CellGroupData[{
Cell[88836, 2034, 97, 1, 31, "Input"],
Cell[88936, 2037, 329, 10, 30, "Output"]
}, Open  ]],
Cell[89280, 2050, 254, 7, 31, "Input"],
Cell[89537, 2059, 1332, 29, 52, "Input"]
}, Open  ]],
Cell[CellGroupData[{
Cell[90906, 2093, 200, 2, 27, "Subsubsection"],
Cell[91109, 2097, 673, 20, 52, "Input"],
Cell[91785, 2119, 270, 7, 31, "Input"],
Cell[92058, 2128, 269, 7, 31, "Input"],
Cell[CellGroupData[{
Cell[92352, 2139, 444, 12, 31, "Input"],
Cell[92799, 2153, 262, 6, 30, "Output"]
}, Open  ]],
Cell[93076, 2162, 132, 3, 31, "Input"],
Cell[93211, 2167, 442, 12, 31, "Input"],
Cell[CellGroupData[{
Cell[93678, 2183, 578, 16, 72, "Input"],
Cell[94259, 2201, 205, 5, 30, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[94501, 2211, 463, 12, 52, "Input"],
Cell[94967, 2225, 31, 0, 30, "Output"]
}, Open  ]],
Cell[95013, 2228, 3181, 96, 112, "Input"]
}, Closed]],
Cell[CellGroupData[{
Cell[98231, 2329, 138, 1, 21, "Subsubsection"],
Cell[98372, 2332, 2849, 79, 213, "Input"],
Cell[CellGroupData[{
Cell[101246, 2415, 280, 8, 31, "Input"],
Cell[101529, 2425, 244, 6, 30, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[101810, 2436, 478, 14, 53, "Input"],
Cell[102291, 2452, 112, 1, 30, "Output"]
}, Open  ]],
Cell[102418, 2456, 273, 7, 33, "Input"],
Cell[CellGroupData[{
Cell[102716, 2467, 240, 5, 31, "Input"],
Cell[102959, 2474, 487, 9, 30, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[103483, 2488, 207, 5, 31, "Input"],
Cell[103693, 2495, 347, 8, 33, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[104077, 2508, 252, 7, 39, "Input"],
Cell[104332, 2517, 219, 5, 33, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[104588, 2527, 208, 5, 31, "Input"],
Cell[104799, 2534, 309, 6, 33, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[105145, 2545, 447, 13, 58, "Input"],
Cell[105595, 2560, 313, 7, 33, "Output"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[105957, 2573, 326, 7, 27, "Subsubsection"],
Cell[106286, 2582, 1431, 29, 52, "Input"],
Cell[107720, 2613, 563, 14, 31, "Input"],
Cell[108286, 2629, 770, 18, 31, "Input"],
Cell[109059, 2649, 471, 12, 31, "Input"],
Cell[109533, 2663, 429, 10, 31, "Input"],
Cell[109965, 2675, 392, 7, 31, "Input"],
Cell[110360, 2684, 643, 16, 31, "Input"],
Cell[111006, 2702, 2631, 72, 185, "Input"],
Cell[113640, 2776, 303, 9, 31, "Input"],
Cell[113946, 2787, 938, 25, 61, "Input"]
}, Closed]],
Cell[CellGroupData[{
Cell[114921, 2817, 235, 3, 21, "Subsubsection"],
Cell[115159, 2822, 1795, 50, 72, "Input"],
Cell[116957, 2874, 1263, 31, 52, "Input"],
Cell[CellGroupData[{
Cell[118245, 2909, 212, 4, 31, "Input"],
Cell[118460, 2915, 310322, 5338, 433, "Output"]
}, Open  ]],
Cell[428797, 8256, 1217, 29, 52, "Input"],
Cell[430017, 8287, 1118, 27, 52, "Input"]
}, Open  ]],
Cell[CellGroupData[{
Cell[431172, 8319, 176, 2, 27, "Subsubsection"],
Cell[431351, 8323, 424, 12, 31, "Input"],
Cell[CellGroupData[{
Cell[431800, 8339, 596, 16, 54, "Input"],
Cell[432399, 8357, 11054, 238, 237, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[443490, 8600, 69, 1, 31, "Input"],
Cell[443562, 8603, 12230, 253, 240, "Output"]
}, Open  ]],
Cell[455807, 8859, 654, 18, 31, "Input"],
Cell[CellGroupData[{
Cell[456486, 8881, 236, 5, 38, "Input"],
Cell[456725, 8888, 1381, 27, 241, "Output"]
}, Open  ]],
Cell[458121, 8918, 1851, 54, 72, "Input"],
Cell[459975, 8974, 527, 9, 31, "Input"],
Cell[CellGroupData[{
Cell[460527, 8987, 1040, 24, 31, "Input"],
Cell[461570, 9013, 653, 11, 30, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[462260, 9029, 1198, 22, 52, "Input"],
Cell[463461, 9053, 1362, 27, 225, "Output"],
Cell[464826, 9082, 1362, 27, 225, "Output"]
}, Open  ]]
}, Closed]],
Cell[CellGroupData[{
Cell[466237, 9115, 220, 3, 21, "Subsubsection"],
Cell[466460, 9120, 665, 16, 31, "Input"],
Cell[467128, 9138, 524, 10, 31, "Input"],
Cell[467655, 9150, 402, 8, 31, "Input"],
Cell[468060, 9160, 499, 10, 31, "Input"],
Cell[468562, 9172, 730, 15, 31, "Input"],
Cell[469295, 9189, 318, 6, 31, "Input"],
Cell[469616, 9197, 255, 5, 31, "Input"],
Cell[469874, 9204, 457, 13, 31, "Input"]
}, Closed]],
Cell[CellGroupData[{
Cell[470368, 9222, 197, 2, 21, "Subsubsection"],
Cell[470568, 9226, 7003, 164, 362, "Input"],
Cell[477574, 9392, 90, 3, 31, "Input"],
Cell[477667, 9397, 86, 2, 31, "Input"],
Cell[CellGroupData[{
Cell[477778, 9403, 243, 4, 29, "Text",
 CellGroupingRules->{GroupTogetherGrouping, 10000.}],
Cell[478024, 9409, 10032, 269, 479, "Input",
 CellGroupingRules->{GroupTogetherGrouping, 10000.}]
}, Open  ]],
Cell[488071, 9681, 4097, 60, 52, "Input"],
Cell[492171, 9743, 1716, 41, 152, "Input"],
Cell[CellGroupData[{
Cell[493912, 9788, 619, 16, 112, "Input"],
Cell[494534, 9806, 840, 14, 50, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[495411, 9825, 217, 5, 31, "Input"],
Cell[495631, 9832, 341, 6, 30, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[496009, 9843, 121, 3, 31, "Input"],
Cell[CellGroupData[{
Cell[496155, 9850, 529, 11, 23, "Print"],
Cell[496687, 9863, 676, 13, 23, "Print"],
Cell[497366, 9878, 313, 4, 23, "Print"]
}, Open  ]]
}, Open  ]],
Cell[497706, 9886, 190, 4, 31, "Input"],
Cell[497899, 9892, 235, 6, 31, "Input"],
Cell[498137, 9900, 4693, 109, 203, "Input"],
Cell[502833, 10011, 1068, 28, 55, "Input"],
Cell[503904, 10041, 4226, 91, 232, "Input"],
Cell[508133, 10134, 1554, 33, 52, "Input"],
Cell[CellGroupData[{
Cell[509712, 10171, 125, 2, 31, "Input"],
Cell[509840, 10175, 366, 6, 30, "Output"]
}, Open  ]],
Cell[510221, 10184, 6616, 154, 332, "Input"],
Cell[516840, 10340, 6616, 154, 332, "Input"],
Cell[523459, 10496, 3127, 81, 152, "Input"],
Cell[526589, 10579, 82, 2, 31, "Input"],
Cell[526674, 10583, 550, 15, 52, "Input"]
}, Closed]],
Cell[CellGroupData[{
Cell[527261, 10603, 289, 4, 21, "Subsubsection"],
Cell[527553, 10609, 432, 13, 31, "Input"],
Cell[527988, 10624, 96, 1, 31, "Input"],
Cell[528087, 10627, 1887, 50, 118, "Input"],
Cell[529977, 10679, 986, 27, 52, "Input"],
Cell[530966, 10708, 200, 4, 31, "Input"],
Cell[531169, 10714, 300, 7, 31, "Input"],
Cell[531472, 10723, 1068, 26, 72, "Input"]
}, Closed]],
Cell[CellGroupData[{
Cell[532577, 10754, 323, 4, 21, "Subsubsection"],
Cell[CellGroupData[{
Cell[532925, 10762, 337, 11, 31, "Input"],
Cell[533265, 10775, 234, 5, 30, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[533536, 10785, 1061, 25, 72, "Input"],
Cell[534600, 10812, 431, 6, 30, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[535068, 10823, 1084, 23, 72, "Input"],
Cell[536155, 10848, 409, 6, 30, "Output"]
}, Open  ]],
Cell[536579, 10857, 2980, 59, 94, "Input"]
}, Closed]],
Cell[CellGroupData[{
Cell[539596, 10921, 335, 6, 21, "Subsubsection"],
Cell[539934, 10929, 239, 6, 31, "Input"],
Cell[540176, 10937, 202, 4, 31, "Input"],
Cell[540381, 10943, 186, 4, 31, "Input"],
Cell[540570, 10949, 839, 19, 52, "Input"],
Cell[541412, 10970, 984, 28, 72, "Input"],
Cell[542399, 11000, 401, 12, 47, "Input"],
Cell[542803, 11014, 225, 6, 31, "Input"]
}, Closed]]
}
]
*)

(* End of internal cache information *)
